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Editorial 



LA CRISIS DE LOS Ks 



A estas alturas del ano, cuando solo nos resla por 
ver lo que pueda ofrecernos el SIMO, y ya se intuye 
la presion publicitaria de las campanas de Navidad, 
es el momento de hacer un repaso de lo que microin- 
formaticamente ha sido el ano 86. Lo iniciamos, ilu- 
sionadamente, con" la Uegada de los 128 K. Tanto 
-Xpmmodore como Sinclair parecian dispuestos a sa- 
tisfacer la demanda de Ks de memoria que exigian 
los usuarios para sentir que sus maquinas no se que- 
daban atras en el imparable avance de los micros por 
alcanzar las capacidades mitologicas de los grandes 
ordenadores. Sin embargo, en estos liltimos meses, 
los fabricantes han decidido reconsiderar el camino 
que habn'an de tomar sus nuevos productos. 

Los que intuian una progresion geometrica de las 
capacidades de memoria que se proyectaba asi hacia 



el infinite, se han encontrado con que Coimnodore 
ha disenado una bonita carcasa para su clasico C-64. 
Y que Sinclair-Amstrad, aunque ha hecho bastante 
mas por su 128 (le ha incorporado un cassette, un 
chip de sonido y alguna cosa mas) no ha superado el 
hston de los 128 K alcanzado el invierno pasado ni 
en un solo bit. Si no hubiera sido por el software el 
ano del Cometa, del Amiga y de la caida de los pre- 
cios de los PC compatibles, habria sido un ano gris 
para nuestros micros. Han sido los creadores de pro- 
gramas los que han dado el do de pecho y han pues- 
to en evidencia las autentkas capacidades de estas 
magnificas maquinas. De su trabajo teneis una am- 
plia muestra en la revista de software de este niime- 
ro. Disfrutad con ellos de vuestro micro, y el aiio que 
viene ya veremos... 



LOS MEJORES DE INPUT 

Memos pensado que es interesante dispOHer de un ranking que El resultado de las votaciones sera publicado en cada numero j 

ponga en claro, mes a mes, cuaies son los programas preferidos de INPUT. 
■ de nuestros lectores. Para ello, es obligado preguntaros directamen- Entre los votantes sortearemos 10 cintas de los titulos que pidais 

te y tener asi el mejor termometro para conocer vuestras preferen- en vuestros cupones. 

cias, Podeis votar por cualquier programa aunque no haya sido co- Nota: No es precise que corteis la revista, una copia hecha a ' 
. mentada todavia en INPUT, maquina o una simple fotocopia sirven, 

Enviad vuestros votos a; LOS MEJORES DE INPUT P." de la Castellana, 93. Planta 14. 28046 Madrid 


ELIGE TUS PROGRAMAS ] 

Primer tttuloelegidol i i i Senundo tftulo eleaido 1 i i i i i i , , 1 


- TercerWuloelegidQ 1 i i [ j i i i , I Pmgnma qiip tf qustaria corTseautr 1 i i i i i i i , , | 


Qui ordenador tieneR 1 i i j i i t r r i i i i i i Nnmbm 1 r i i i i i I 


1 l."Apelltdo !__i — 1 — 1 — 1 — 1_ i \ \ \ \ ,1 ?»Aneiriiln 1 r r i i i 1 


Fecha de nacimiento 1 i j j i i t i j i i Ti.i<ifono I i i 


1 Direcciftn I — i — i — \ — 1_ i i i i i I Localidart 1 i i , 


Provincia 1 i i i i i i i i i i i i r i i i ■ i 
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GRAFICOS PAGINADOS 



LIMITES DE LA MEMORIA 



TECNICAS DE PAGINA CION - 
PROGRAMA DE ANIIVIACION *■ 



PARA C-64 



Caoocer el fuiidamento de los gi^n- 
os p^^ados abre uii mundo hacia las 
padindades de esta tecnlca. Alguh 
^effiplo demues'tra como funciona en 
d Commodore j54.' 

Los graficos paginados — tecnlca de 
comnutar desde una pagina grafica a 
otra — ofrecen un potencia! considera- 
We en muchos tipos diferentes de apli- 
caciones en las que se precisa un cam- 
bio rapido de Ids datos de una panta- 
lla a los de otra. Aunque su utUizacion 
obvia es la animacion de imagenes con 
ordenador, pueden ser aplicadas en 
usos mas series, siendo un ejemplo los 
diagramas que muestran cifras en pan- 
talla. tal como es el caso de programas 
financiered. 

EI principio que se esconde tras los 
graficos paginados consiste en definir 
y despues confinar en la memoria los 
datos corrcspendientes a pantallas di- 
ferentes. Estos datos pueden tomar la 
forma de graficos en alta o baja rese- 
lucion incluso texto, tal vez una 
combinacKn"3e ellos. Cada una do es- 
tas pantallas puede ser llamada en una 
sucesion muy rapida, sin necesidad de 
tiempo para calcular como llenar cada 
una de las pantallas. 

El tiempe para llenar la pantalla si- 
gue siendo un requerimiento, pero so- 
lamente es necesario hacerle una vez 
para cada pantalla diferente antes de 
comenzar a visualizarlas. Despues se 
confinan en zonas adecuadas de la me- 
moria, pudiendo reclamarse instanta- 
neamente cuando se requieran. 

RESTRICCIONES DE LA MEMORIA 

Cada «pagina» de datos de pantalla 
requiere una determinada cantidad de 
memoria. La cantidad neeesaria van'a 
debido a que cuantos mas colores uti- 
lices, y mayor sea la resolucion de los 
graficos mas se necesitara. En algunes 

6 INPUT 



2 y 4 asi como las 3 y 5, es tal que poco 
se nota si ambas son en realidad la 
misma imagen. Esto produce una se- 
cuencia 1,2,3,2,3,1, etc. La secuencia 
sigue siendo de cinco imagenes, pero 
solo se precisan tres pantallas. 

En el Commodore 64 solamente se ■* 
pueden almacenar dos pantallas de 




cases existen severas restricciones de 
memoria en funcion del programa. Es 
entonces cuando hay que reducir el 
use de la pantalla a solamente una 
fraccion de su tamano normal. Tam- 
bien es necesario a menudo sacrificar 
.;Coleres y resolucion. Es obligado de- 
ijar espacio en la RAM para el progra- 
ma. 

La tecnica de la paginacion puede 
Uamar a pantallas individuales deposi- 
tadas en la memoria, siguiendo cual- 
quier orden y mas de una vez en cual- 
quier secuencia que sea precise. 
\Por;'tanto es factibie construir una 
■'secuencia de paginacion de quizas 
echo pantallas, aunque en realidad 
existan muchas menos presentes en la 
memoria. Esta util tecnica de ahorro 
de memoria es especialmente efectiva 
si tencmos cuidado de asegurar que 
los graficos de las pantallas repetidas 
intermediamente no hagan nada en 
detrimento del «flujo» de la anima- 
cion. ,^-^,__ „ , '% 

For ejemplo, un programa que 
muestre a un hombre de alambre an- 
dando, podria utilizar las paginas 
1,2,3,4,5,1,2,3,4,5, etc. Sin embargo 
donde el espacio sea una Iimitaci6n, la 
similitud entredos imagenes, p. ej. las 



alta resolucion simultaneamente. 
Contener una imagen de una pantalla 
per mapa de bits significa 8 Kbytes de 
memoria. Afortunadamente se pue- 
den utilizar secciones mas pequenas 
de la pantalla de cara a incrementar el 
numero dc paginas disponibles para 
este tipo de graficos y esto es lo que 
hace el ejemplo que sigue para obte- 
ner un total de cinco paginas. 

Este programa hace uso del cartu- 
cho Simon's BASIC. Este cartucho 
ocupa la RAM situada entre las direc- 
ciones 8192 y 16384, siendo conve- " 
niente utilizar la RAM que hay mas, 
arriba para las paginas graficas. 

pars Commodore-64 

20 POKE 51,255:FOKEE 52,29: 
POKE 55^255:POKE 56,29: 
CLR 



i 



I 



50 
40 
50 
60 



220 



60SUB 

D==64 

FOR N=0 TO 4 

HIRES 0,1 :MULTI 7 ,^,Zi 

COLOUR 6,0 
70 FOR Z=1 TO 12:F0R ZZ=1 TO 

3:LINE Z*Z+ZZ*(N+1),0,Z*Z 

+ZZ*CN+1),100,ZZ 
75 PLOT RNDC1)*160,RNDC1)* 

100,RND(1)*3+1:NEXT ZZ,Z 
80 FOR ZZ=1 TO 3:LINE 0,(N* 

13)+ZZ*CN+1),159,(N*19)+ 

ZZ*(N+1),ZZ:NEXT ZZ 
90 FOR ZZ=1 TO 3:CIRCLE 10+ 

N*35,60,20-ZZ*3,10+N*3,ZZ 

:NEXT ZZ 
100 GOSUB 430:D=D+12 
110 NEXT N 

130 BLOCK 0,0,159,199,3 
140 TEXT 0,100, 
"ANIMACION",0 



150 D=64:F0R N=D TO 4 

170 GOSUB 440:D-D+12:F0R T=1 
TO 15:NEXT T 





190 NEXT N 

200 GOTO 150 

220 FOR Z=7680 TO 7738: READ 

X:POKE Z,X:NEXT Z:RETURN 
230 DATA 169,0,141,14,220, 

169,53,133,1 
240 DATA 169,0,133,251,133, 

253,169,224,133,252,169, 

64,133,254,160,0 
250 DATA 177,251,145,253,192 

,63,208,16,165,252,201, 

235,208,10 
260 DATA 162,1,142,14,220, 

162,55,134,1,96,200 
270 DATA 208,229,230,252,230 

,254,76,25,30 
430 POKE 7700,D:P0KE 7706, 

251:P0KE 7708,253:SYS 

7680:RETURN 
440 POKE 7700,D:POKE 7706, 

253:P0KE 7708,251 :SYS 
7680:RETURN 



DESENSAMBLADO DEL CODIGO 
MAQUINA. 



,1E00 
,1E02 
,1E05 
,1E07 

,1E09 
,1E0B 

,1 EQD 



.A9 
8D 
A9 
85 
A9 
85 
85 



00 
OE 
35 
01 
00 
FB 
FD 



DC 



LDA #$00 
STA $DCOE 
LDA #$35 
STA $01. 
LDA #$00 
STA $FB 
STA $FD 



,1E0E 


A9 


EO 


LDA 


#$E0 


,1E11 


85 


FC 


STA 


$FC 


,1E13 


A9 


40 


LDA 


#$40 


,1E15 


85 


FE 


STA 


$FE 


,1E17 


AO 


00 


LDY 


#$00 


,1E19 


B1 


FB 


LDA 


($FB),Y 


,1E1B 


91 


FD 


STA 


($FD),Y 


,1E1D 


CO 


3F 


CPY 


#$3F 


,1E1F 


DO 


10 


BNE 


$1E31 


,1E21 


A5 


FC 


LDA 


$FC 


,1E23 


C9 


EB 


CMP 


#$EB 


,1E25 


DO 


OA 


BNE 


$1E31 


,1E27 


A2 


01 


LDX 


#$01 


,1E29 


8E 


OE 


DC STX 


$DCOE 


,1E2C 


A2 


37 


LDX 


#$37 


,1E2E 


86 


01 


STX 


$01 


,1E30 


60 




RTS 




,1E31 


C8 




INY 




,1E32 


DO 


E5 


BNE 


$1E19 


,1E34 


E6 


FC 


INC 


$FC 


,1E36 


E6 


FE 


INC 


$FE 


,1E38 


4C 


19 


IE JMP 


$1E19 



Este programa comtenza ajustandtf 
el tope para e! texto en BASIC sufi- 
cientemente debajo del Simon's para 
aceptar (ver el CLR) una corta rutina 
en codigo maquina que maneje la pa- 
ginacion entre pantallas. Esta rutina 
se carga en la memoria por medio de 
la subrutina que comienza en la linea 
220, siendo accedida posteriormente, 
tanto para almacenamiento como para 
llamadas, por sentencias SYS. 




GANADORES 



En el sorteo correspondiente al numero 14 entre quienes escribisteis mandando vuestros votos a MI'S 
MEJORES DE INPUT han resuKado ganadores: 

NOMBRE 



Joan Minguell Arrufat 
Alfredo Rodriguez Nogeira 
Pedro Castafio Perez 
Manuel Martin Gimenez 
Carlos Mateo Ballorca 
L Carlos Martinez Zapata 
Rafael Perez Defgado 
J. Javier Munoz Romero 
J. Ramon Rogada Arribas 
Antonio Martinez Alvarez 



INPUT 7 



LOCALIDAD 


JUEGO ELEGIDp 


Borges Blanques (Lerida) 


. Skyfox. 


Valiadolid 


Rambo 


H. de Llobregat (Barcelona) 


Skyfox 


Almerfa 


Saboteur 


Burgos 


KungFu. Master 


Madrid 


Green Beret 


Huelva 


Green Beret 


Barcelona 


Pistop II 


Mteres (Asturias) 


Green Beret 


Barcelona 


«v« 



W^^F 



ai^g«HgiCBPgSCgT-j^™«^ 



Progromooon 



El primero de los punteros dc la 
palilalia es estabiecido en la Imea 40 
en cl comienzo del area de RAM dis- 
ponible debajo del Simon's. El pro- 
grama continiia con una rutina de di- 
bujo para las cinco pantallas, recu- 
rriendo al bucle FOR. . .NEXT de la If- 
nea 50. 

Las lineas 60 a 90 manejan el dise- 
fio en si. Cuando esta complete el tra- 
bajo de dibujo, se accede a la rutina 
con POKES de la Imea 440, haciendo 
una Uamada SYS a la rutina en codi- 
go maquina. Asi es confinado el pri- 
mer bloque de dibujo en su lugar adc- 
cuado de la memoria. 

Despues contimia el bucle trazando 
las otras cuatro pantallas, situadas 
cada una en un bloque de 3 Kbytes por 
medio del ajuste de punteros realiza- 
do con D = D4-12 en la linea 100. 

La linea 130 limpia la pantalla y la 



tine de azul claro, imprimiendo con la 
linea 140 un mensaje de comienzo de 
la secuencia que le sigue. 

El puntero de memoria D es inicia- 
lizado a su valor original de 64, la di- 
reccion inicial de la primera pantalla 
que existe inmediatamente debajo del 
final del Simon's. 

La primera de las cinco pantallas es 
llamada a partir de este memento con 
la linea 440, que vuelve a acceder a la 
rutina en codigo maquina de la direc- 
cion 7680. 

El puntero es ajustado en la linea 
170 (D = D+12) para la siguiente 
pantalla. Sc produce una pequefia dc- 
mora de tiempo con el bude T— 1 TO 
15, y la nueva pantalla pasa a solapar- 
se sobrc la anterior. Se repite lo mis- 
mo a traves de los cinco cuadros, res- 
taurandose el puntero original al com- 
pletarse el bucle. 



Puedes utilizar la misma rutina en 
codigo rnaquina para tus propios pro- 
gramas, acordandote de establecer la 
coordenada de la esquina inferior de- 
recha de la pantalla y ajustar el valor 
del byte bajo en lugar del 63 y el va- 
lor del byte alto sustituyendo al 253 de 
la linea 250 cuando utilices el Simon*s 
BASIC. 

Si no utilizas el cartucho para tra- 
bajar en alta resolucion, recuerda que 
las direcciones de la memoria de pan- 
talla cemienzan en 8192 {bajo 0, alto 
32) y no en 57344 como con el Si- 
mon's. 

Si tu disefio implica un tamaiio de 
pantalla inferior, libera mas memoria 
para paginacion, ajusta los bucles 
FOR.. .NEXT, incrementando el va- 
lor del puntero D para adecuarse al 
numero y tamaiio de la memoria de 
cada pagina. 




Programoff" 



EXPONENTES 



COMA FLOTANTE 



WUMEROS NEGATIVOS 



ALMACENAMIENTO DE 



NUMEROS EN MEMORIA 



94 NEXT F:F=0 

96 IF F=LEN(N$) THEN N$= 

LEFT$CN$,LENCN$)-1) : 

GOTO 100 
98 IF FOO THEN N$=LEFT$ 

(N$,N$,F-1)+MID$(N$,F+1 ) 




+"."+MID$CN$,F+2):G0T0 80 
100 N$=N$+"0":GOTO 80 
110 IF RI6HT$CN$,1)="."THEN 

N$=LEFT$CN$,LENCN$)-1) 
120 GOTO 180 

130 IF ABS<N)>=1 THEN 170 
140 N=N*10 
142 FOR F=1 TO LEN(N$):IF 

MID$CN$,F,1)=","THEN U6 
144 NEXT F:F=0 
146 IF F=1 THEN N$="0"+MID$ 

CN$,,2):GOT0 130 
150 IF FOO THEN N$=LEFT$CN$ 

,F-2)+"."+MID$CN$,F-1,1D 

+HID$CN$,F+1):G0T0 130 
160 N$=","+N$:G0T0 130 
170 IF VAL(A$)<0 THEN N$="-" 

+N$ 
180 PRINT'TSHIFT+CLR/HOMe:"; 

A$;"ECRSR dcha.lIGUAL A" 

: PRINT N$ 
190 GOTO 20 

200 IF ABSCNXI THEN 220 
210 IF ABS(N)>=10 THEN E=E+1 

:N=N/10:G0T0 210 
215 GOTO 230 
220 IF ABS(N)<=1 THEN E=E-1 : 

N=N*10:GOTO 220 
230 PRINT'TSHIFT+CLR/HOMEn 

CCRSR dcha.r';A$;"[CRSR 
dcha-3lGUAL A":PRINT N; 

"ECRSR izqda.]";:IF EOO 

THEN PRINT"E";E 
240 PRINT:G0TO 20 



Cuando ejecutes este programa, el 
ordenador espera que escribas un nii- 
mero. Deberas teclear un nurnero po- 
sitivo en forma clasica o exponencial. 
No te preocupes si continuan sin sa- 
ber lo que es un exponencial, pronto 
lo haras. Para convertir un numero es- 
crito con exponente en uno mas signi- 
ficative para ti, necesitas simplemente 
multiplicar los primeros digitos del nu- 
mero (conocidos por mantisa) por 10 
elevado a la potencia de la cantidad 
que sigue a E, que es conocido como 
exponente de ese mimero. 

Aunque esto suena bastante 
complicado, si lo trabajas paso a 
paso, rapidamente se ve claro. 
Toma 1.23E4 para convertirlo a la 
forma usual, multipUca la mantisa 
(1.23) por 10 elevado a la potencia 
del exponente, que es igual a 



1,23*10.000. Asi que 1,23E4 es lo mis- 
mo que 12,300. 

Para cualquier niimero^ la mantisa 
toma siempre un valor de un digito se- 
guido por una coma decimal, varian- 
do por tanto entre 1,0 y 9,999999... 

Los numeros negatives se manejan 
igualmente, solo que la mantisa toma 
un valor negativo. Si lo negative es la 
mantisa, el efecto es diferente, pero 
veamoslo mediante la utilizacion del 
programa. 

ALMACENAMIENTO DE 
NUMEROS 



El conocimiento de los numeros ex- 
ponenciales puede ser interesante, 
pero tambien son titiles para mejor co- 
nocer la forma en que la mayoria de 
los ordenadores almacenan los nume- 
ros. 

Cuando tecleas un comando tan 
simple como PRINT 10*10, el ordena- 
dor los trata realmente con mas deta- 
lle. Traduce los numeros en un tipo de 
formate exponencial Uamado «coma 
flotante» (punto flotante para los an- 
glosajones) y los calcula con esta for- 
ma. 

Existe tambien otra complicacion. 
Como podras ver en el articula desti- 
nado a la creacion de GDUs (Grafi- 
cos Definidos por el Usuario) desde e! 
BASIC, los ordenadores almacenan 
cada numero en binario, o base dos. 

Para mostrar como se guardan los 
numeros en la RAM de tu ordenador, 
sigue este ej emplo de un calculo basa- 
do en el numero 10. 

El primer paso es convertirlo a bi- 
nario, lo que da los numeros 
00001010,00000... 

Los cuatro primeros ceros de este 
niimero en binario no significan nada, 
y podria facilmente haberse prescindi- 
do de ellos, lo que nos deja con 
1010,00000... Como vimos previamen- 
te, un numero decimal con exponente 
consiste en un numero situado entre 
1,0 y 9,999999... Cuando se almacena 
un numero en coma (punto) flotante 
en el ordenador, la mantisa consiste 
en un numero binario que siempre co- 
mienza en .1. 

Esto es posible debido a que el ta- 



INPUT 1 1 




mano dc la parte exponencial del nu- 
mero determina la posicion dc una 
«coma binaria», el equivalente binario 
de ia coma decimal. Como es algo de- 
finido automaticamente , la mantisa no 
necesita especificar donde se situa la 
coma. 

Existe un problema: ^como ajustas 
el exponente para mostrar donde de- 
beria estar el punto binario, y como 
conviertes el niimero binario para que 
comience en .1? 

DESPLAZAIMDO LA COMA 



En efecto, la respuesta a ambos 
problemas es la misma. Todo lo que 
haras es dcsplazar la coma hasta que 
se enfrente al primer 1 y por cada lu- 
gar que se mueva la coma anadiras un 
1 al exponente. Por ejempio, con el 
mimero decimal 58 (111010.000 en bi- 
nario), la coma binaria se mueve gra- 
dualmente hacia la izquierda, hasta 
que no haya numeros a su izquierda, 



unicamente ceros. En este case has 
desplazado la coma 6 lugares a la iz- 
quierda, por lo que el exponente es 
+6 y la mantisa .11101000... 

En efecto, el exponente comienza 
valiendo 128, por razones que descu- 
briras mas tardc, le sumaras el ante- 
rior mimero. De esta forma, el expo- 
nente del ejempio con el numero 58 
se convierte en 128-!-6— 134, que el 
ordenador almacena en forma binaria. 

Para recapitular, el ordenador al- 
macena la parte exponencial del mi- 
mero en un byte y tambien la manti- 
sa, que puede utilizar hasta 4 bytes, 
tres de los cuales serian llenados con 
ceros en este ejempio. 

Cualquier numero en coma flotanle 
puede ocupar hasta cinco bytes . Esto 
limita el tamano del numero maximo 
que puede almacenarse en el ordena- 
dor. El linico byte dedicado al expo- 
nente da un maximo posible de 2 ele- 
vado a la potencia 127. Podria ser has- 
ta 255, pero el primer bit es utilizado 
para el signo del exponente. 



El maximo numero utilizable por la 
mantisa es .11111 etc, con todos los 
bits valiendo 1. esto se aproxima mu- 
cho a 1.000 etc., que es el valor 1 tan- 
to en binario como en decimal. El me- 
nor numero es .1000 etc. siendo todos 
excepto el primer bit. El primero ha 
dc ser un 1 puesto que la coma (pun- 
to) binaria se desplaza hasta alcanzar 
el primer 1 del numero. Por otra par- 
te, conviene saber que .1 es el equiva- 
lente binario de 1/2 en decimal. 

Multiplicando las dos partes del nu- 
mero, puedes hallar el mayor numero 
almacenable en formato de coma flo- 
tante, que es 1.70141E38. Puedes em- 
plear el programa de mas adelante 
para comprobar como lo almacena el 
ordenador. 



CASOS ESPECIALES 



Ahora que tienes una completa idea 
del proceso, veremos que existen dos 
variaciones a ello. 



CONTABIUDAD PERSONAL Peruifte llevaf el control de sus cuentss dom^stos. .^ 
cuentas de gustos y 20 de ingresos. 3 cuenlas bancarias y I de caj3. D'sqratna de barras. 
Informes pw conceptos. (dj 3=000 jc| 2,.500 

SIMULADOR DE SPEaRUM. Transforma su C-64 en un Spearum de 
48K. Admite programas en BASIC de Spearum jc) 2,500 

PERSPECriVAS. Procesador de Jmagenes de figuras volumetricas 
que obtiene en graficos de ^Ita re^., perspeaivas conicas, axonometri- 
cas, planta y alzado de una figura delinida a partir de coorde- 
nadas (c| 5.SM [dj 6.000 

PROTEXT, Pfocesador de textos de facil manejo por ventanas, con araaeres espamles, 

Visianado del texto poi pantalla en 80 niolumnas |d] 7.9S0 



IMPRESORA AMSTRAD 2000 Centronics. 105 c.p.s. 43.000 

IMPRESORA AMSTRAD 2000. Interface Commodore 48.000 

UNIDAO DISCOS COMMODORE 1571 63.900 

UNIDAD DISCOS COMMODORE 1570 49.900 

UNIDAD DISCOS COMMODORE 1541 42.900 






ss/oa 



5 1/4 G/mANT12Aim GENTRO REFORZADa 
48 TPlEspedBl COMMODOR£,A?PLaTARL (10 uniaadesl 



1.300,- 



lOYSTICK QUICKSHOT II plus con mlcrorniptores 2.950 

QUICKDISC +. Mas de 7 funclones extras 4.900 
FINAL CARTRIDGE INueva version con FREEZER} 9.900 
CABLE 80/40 COLUMNAS para 128 

(adaptable a cualquier monitor/ 3.100 

DISK ISOTCHER. 

(Taladro para discos Simple cara) 1.950 

FUENTE DE ALIMENTACrON C-64 Y VIC-ZO 6.S0O 



SIMiHlIffill ^ 



/AMIGA ^^c~,..^...t.r^ 



CODEMASTER 



Primero de una serie de pi^gramas pensados para que ^roveche aj maximo las posi- 
bilidades del AMIGA. Paitiendo del diseno de una pantalla yespecificaciones de un 
tichero, esta aplicacion genera un complete programa en AMIGA/BASIC que le per- 
mitira crear y mantener una sofisticada BASE DE DATOS, segun especificaciones y 
con la posibilidad de adaptarla^a sus futures necesidades. 



9S.OOO pt»i. 



BCRSEN MASTER 

Tratamiento avanzado de entradas y salidas por 
pantalla. DefinlclDn de campos, operaciones ma- 
temalicasentr6campos,fwmateo,etc... Imple- 
mentado para poder accederfki Imente a las dis- 
tintas rutinas del basic. 



r I I.EMA3TER: 



Gestiondeflchetos para AMIGA. Permitegene- 
rar ficheros FSAM accesibles desde basic. Co- 
mando para lectura, gtabacion, adualizaclDn, 
busqueda por claves, 

Capacidad defichero iimitada unicamente par 
la capacidad del disco. ^'-soo pm. 



SOLICITE NUESTRO CATALDGO 



ENVIOS CONTRA REEMHOLSO A TODA ESPANA SIN GASTOS. PEDI- 
DOS JNFERIORES A 1 .000 PTS. ANADIR 200 PARA GASTOS DE ENVIO. 
SOFTWARE OE GESTIOIU V APLICACIONES A MEDIDA. 



CIMEX 

ELECTROIMICA 



FLORIDABLANCA 54,ENT.3.A 

08015 BARCELONA 

TEL.224 34 22 



PrograiflOflf" 



■.^■ 



. im' 












La primera viene cuando el niime- 
ro inicial es menor que uno. En este 
caso el desplazamiento de la coma ha- 
cia la izquierda hace que vaya en sen- 
tido contraho de como debiera ir. For 
lo que habras de dirigirla hacia la de- 
recha. Asi el ordenador sabe donde 
deberia situarse la coma en el numero 
final, sustrayendo uno del exponente 
cada vez que se retrocede. El expo- 
nente comienza, como con los nume- 
ros mayores que 1, con un valor de 
128. 

A menudo, cuando escribes un nu- 
mero binario, se escriben sobre ellos 
los equivalentes decimales de cada 
«coluinna». Volvemos a remitirnos a 
ia conversion binario decimal del arti- 
culo de los GDUs. Luego se suman los 
valores de las columnas que tienen un 
1 y se obtiene el equivalente decimal. 
Son los valores 1,2,4,8.6,32,64.... 
pero recordemos que estos se situan a 
la izquierda de la coma. En el caso de 
que la coma binaria se encuentra a la 
derecha, los valores asocigdos a cada 
columna son fracciones; 1/2, 1/4, 1/8, 
1/16, 1/32, 1/64... 

La segunda variante con los nume- 
ros en coma flotante se produce cuan- 
do el numero debe ser capaz de alma- 
cenar su propia version del signo me- 
nos de alguna forma, sin utilizar espa- 
cio adicional alguno de la memoria. 

Se vuelve a recurrir al truco de em- 
plear el primer bit para saber si ei nu- 



mero es positive o negative. Simplc- 
mente, si es negativo el primer bit de 
la mantisa sera pucsto a 0. 

iDONDE ESTA EL NUMERO? 

Con los ejemplos anteriores en 
mente, ahora estas en disposicion de 
ser capaz de saber como almacena los 
niimeros tu ordenador. 

El numero decimal 58 (111010 en 
binario) es almacenado con los si- 
guientes 5 bytes: 

134 104 

y el numero 10 como: 

132 32 

Haz algunos experimentos, calcu- 
lando los valores decimales de los 
bytes que el ordenador almacena para 
tus numeros. Comprueba tus respues- 
tas copiando y ejecutando el progra- 
ma que sigue: 



para C-64 y Vic-ZO 

10 print"cshift+clr/home:": 

CLR 
20 PRINT "ESCRIBE UN NUMERO" 

: INPUT X 
30 V=PEEKC45)+PEEKC46)*256 
40 PRINT "EXPONENTE;";PEEK 

<V+2) 
50 PRINT "MANTISA:"; :FOR N=3 

TO 6 
60 PRINT TAB(10);PEEKCV+N) 
70 NEXT N 
80 END 



El programa siguiente complemen- 
ta al anterior: 



100 REM***SEGUNDO PROGRAMA 
110 PRINT"s":CLR:R=1:V=PEEK 

C45)+PEEKC46)*256 
120 INPUT"ESCRIBE EL EXPO , 

NENTE";EX 
130 IF EX<0 OR EX>255 THEN 

120 
140 POKE V+2,EX 
150 FOR N=3 TO 6 
160 INPUT "ESCRIBE LA 

MANTISA ";MAN 
170 IF MAN<0 OR MAN>255 THEN 

160 
180 POKE V+N,MAN 
190 NEXT 
200 PRINT "RESULTADO=";R 

El primero de los dos programas te 
permite introducir un numero, devol- 
viendo el ordenador los cinco bytes 
utilizados para almaccnarlo. 

El segundo trabaja en sentido inver- 
so, introduciendo los 5 bytes se obtie- 
ne el numero que representa. Algunas 
veces la respuesta presentara el forma- 
te exponencial. 



AHORRANDO MEMORIA 

Conociendo la necesidad de los 5 
bytes para cada numero, pronto te 
das cuenta de que a menudo se des- 

INPUT 13 



perdicia memoria al haber numeros 
que no necesitan totalmente los 4 
bytes de la mantisa. Podrian ser aho- 
rrados y tal vez utilizados para algu- 
nas otra cosa. 

En efecto, puedes ahorrar una can- 
tidad significativa de memoria evi- 
tando el uso de cantidad de numeros, 
pero esto no es siempre posible. Sin 
embargo hay otra forma de reducir 
la cantidad de memoria para cada 
uno. 

Se puede evitar en muchos casos el 
uso de numeros, simplemente ^stable- 
ciendo una variable que sea igual al 
valor que deseas utilizar. Naturalmen- 
te que precisas del mimero en si para 
definir la variable y esta tambien ne- 
cesita algunos bytes de almacenamien- 
to. Si vas a utilizar ese niimero una o 
dos veces, probablemente no merezca 
la pena. 

Una vez que se establece una varia- 
ble, necesitaras solamente un byte 
para cada caracter empleado por ella, 
por lo que si recurres a variables de 
una sola letra, es probable que obten- 
gas un gran ahorro. 

EFECTOS EXTRANOS 

Una vez comprendido todo lo ante- 
rior, podras deducir porque se produ- 
cen a veces cosas raras. Existen impre- 




cisiones de calculo que algunas perso- 
nas tienden a asociar con errores en la 
ROM del ordenador. La razon de que 
aparezcan o desaparezcan cifras apa- 
rentemente de un mode aleatorio, se 
debe a que el ordenador trabaja con 
algiin grado de imprecision, y el orde- 
nador tiende a redondear con nume- 
ros que poseen mas de un determina- 
do numero de digitos. Esto depende 
de cuales sean los numeros y cuantos 
calculos subsecuentes se realizan con 
los valores redondeados. Esto puede 
conducir a resultados erroneos en al- 
gunos casos. 



Afortunadamente, los ordenadores 
son suficientemente precisos para la 
mayoria de las aplicaciones que se los 
ocurren. 

Utilizando matrices se pueden al- 
macenar numeros con mas cifras sig- 
nificativas que el maximo de nueve 
que permite el ordenador. La princi- 
pal ventaja consiste en que puedes es- 
cribir una rutina que visualice el nti- 
mero en su forma normal y no con ex- 
ponente. Con este metodo puedes 
tambien solventar el problema de 
mensajes de error tales como «num- 
ber too large». 



INFORMACION Y VENTA: 



DELTAS IT 

Colon, 20 



DeliiBiT 



46460 SI LLA 
^^ (VALENCIA) 

soFrw*iie.H«mK Tel. (96) 120 29 25 

DISTRIBUIDORES BIENVENIDOS 



FORMA DE PAGO: 

CHEQUE PERSONAL 
CORREO C0NTRAREEMBOL3O 
TAJETA VISA/MASTERGARD 





CARTUCHO FREEZE FRAME MKIII 

EL MEJOR DE LOS METODOS DE BACKUP ES AHORA TODAVIA MEJOR. 

NUEVA VERSION MKIII 

El cartucho le hace BACKUPS de: 

CINTA A DISCO * CtNTA A CINTA * DISCO A DISCO * DISCO A CINTA 

FUNCIONA CON: Ordenadores: C-64, C-1 28 y C-128/D (en modo C-64) - Uni- 
dades de disco: 1541, 1570, 1571 - Dalassette: Commodore o compatible. 
Hace el BACKUP: Ocupando el menor espacio de disco o cinta posible. Tam- 
bien de programas MULTIPROGRAMAS. 100% de exito en el BACKUP. Salva 
a disco en modo TURBOSAVE, TURBOLOAO Y AUTO RUN, o a velocidad Nor- 
ma! (para los que tengan un turbo instalado en la unidad de disco), y en cinta 
salva a unos 2.400 baudios (TURBOSAVE), TUBBOLOAD Y AUTORUN. Es to- 
talmente TRANSPARENTE, lo que implica que no ocupa memoria y que es totalmente compatible con cual- 
quier software. 

IMPORTANTE: Los backups corren INDEPENDIENTEMENTE del cartucho FREEZE FRAME MKII. 
ATENCION: No se deje influenciar por otros medios de BACKUP. El cartucho FREEZE FRAME fue el pri- 
mero en nacer y ha dado lugar a muchas imitaciones. Pero sigue siendo el LIDER. De exclusive uso 
personal. 

GARANTIA: 6 meses. PRECIO: 11.900 ptas. (INCLUIDO: IVA + Gastos de envio). 
DELTABIT ofrece a sus CLIENTES la posibilidad de cambiarles el MKll por la nueva version MKIII, al precio 
de 4.000 ptas. (IVA -i- gastos, incluidos). 

INTERFACE COSMOS' THOUG 

Este interface ie permite hacer backups de seguridad de CINTA A CINTA de TODO software en soporte 

cassette (de CUALQUIER ordenador personal). 

Funcionacon: C-64, C-1 28, C-128/D y dos datassettes Commodore o compatibles (o una datassete y una 

cassette de audio normal). 

100% de exito GARANTIZADO en el backup. De exclusivo uso personal. Testigo aciistico de volu- 

men regulable. GARANTIA: 12 meses. PRECIO: 4.900 ptas. {INCLUIDO: IVA + Gastos de envi'o). 
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RITsmn; news 



DACAmon 



REPRESENTACION EN 
ESPANA DE: 



:^iTSBi\ii; 



PROVENZA, 385-387 
TEL. (93)207 24 99* 



TELEX 97791 
08025 BARCELONA 



IMPRESORA PARA SU COMMODORE 

(optima relacion precio/prestaciones) 



-Cabezal 9 agujas 
-Doble operatividad 
-Cinta autoretintada 
-Tampon retintable 
-Ausencia de rodilk) 
-No dobia el papel 
-Elevadores inferiores 
-Admite texto rigido 
-Maximos tipos de escritura 



'"■'ii, 1 1 



'■' '''-■par, ( ^. 



''fc(M,„ 



.•'3figrt4(¥c*, 




Modelo SUPER C+, 120 cps, 
NLQ, ASCn y COMMODORE 



• Conexion directa a Commodore 
(cable incl.) Tracci6n y friccion 




LA IMPRESORA PARA COMMODORE, ASCH Y PCS COMPATIBLES 

(Maxima versatilidad/precio ajustado) 

RITEMAN 10-C 




—140 cps, traccion y friccion 

— Paralelo centronks/Commodore serie DIN 

— Tablas ASCII y PC en Rom interna 

— Tabla 100% Commodore y 8K RAM en modulo 

—Interface Commodore exterior incluido 

— RS 232-C opcional 



NOTA: Para Aplicaciones en las que se necesite mas velocidad, o mayor tamano de carro, tambien 
pueden aplicarse nuestros interfaces externos a los modelos RITEMAN lO/II y RITEMAN 15. 



Commodore es marca registrada de Commodore Business Machine, Tnc. 

• Estaremos en S.I.M.O. PabellAn DC Stand. G. 104. 




CARACTERES GRAFICOS 
INMEDIATOS 



No es precise conocer el codigo ma- 
quina o ser un experto en ei manejo del 
sistema binario para desarrollar grafi- 
cos utilizables en juegos. Con estos sen- 
cillos ejercicios de prograniacion es po- 
sible realizarlos inmediatamente. 

En tan solo diez minutos es posibic 
crear caracteres graficos originales 
para emplearlos en el diseno de jue- 
gos propios. Todos los ordcnadorcs 
domesticos poseen su propio metodo 
para producir caracteres graficos nue- 
vos o GDUs (Graficos Definiclos por 
ei Usuario). En el Commodore 64 
existen unos muy espedales, los cono- 
cidos sprites con dimension de 24 x 21 
pixels, que no son el objetivo de este 
articulo. 

Sin embargo, en muchos casos es 
conveniente partir de simbolos cuya 
dimension es de 8 por 8 pixels, gene- 
ralmente para los enemigos en un jue- 
go de marcianos. Una vez adquirida 
cierta experiencia es sencillo crear 
imagenes graficas de mayores dimen- 
siones, uniendo varios simbolos para 
ere arias. 



EL DISENO EN BINARIO 

M 

Como es sabido, los ordenadores 
mcmorizan toda la informacion en for- 
mato binario (o sea en base 2). Aun- 
que no es precise conocer el manejo 
del sistema binario para transformar 
los caracteres formados sobre papel 
cuadriculado en una serie de unos y 
ceros. Todo lo que conviene saber es: 

1.- Cada vez que sc quicre iluminar 
un punto (pixel) se le asocia un 1. 

2.- Cuando el punto no debe apare- 
cer se emplea un 0. Si se dibuja, por 
cjeinpio, la cruz de Lorena mostrada 
mas adelante, la primera linea consis- 
te en tres espacios, un punto y otros 
cuatro espacios. Esto en binario es 
00010000. La scgunda linea se compo- 
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ne de dos espacios, tres puntos y tres 
espacios: 00111000. La imagen com- 
pleta sc rcpresenta asf: 



X, 1 



■1 







I1 ^ 

































El programa de este articulo se en- 
carga de todas las operaciones a par- 
tir de la informacion de unos y ceros. 



PASO DE BINARIO A DECIMAL 



El camino mas corto para convcrtir 
los numeros binarios en decimales 
consiste en recurrir a una tabla de 8 
columnas y nueve filas. Cada colum- 
na lleva asociado un valor, potencia de 
2 (elevado a su posicion): 128, 64, 32, 
16, 8, 4, 2, 1. El resto dc las lineas se 
llenan con las series de valores bina- 
rios asociados a la imagen a formar. 
Siguiendo con el ejemplo de la cruz de 
Lorena: 



128 


64 


32 16 8 


4 


2 


1 








r~T L 
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1 1 1 


,|0 














~0 1 r"0"""" 
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1 1 1 
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1 1 
















































Para realizar la conversion, se igno- 
ran todos los ceros. En cada fila hori- 
zontal se suman los valores asociados 
a cada columna en la que exista un 
uno presente. En cl ejemplo, la pri- 
mera fila arroja un valor de 16, la se- 
gunda es de 56 (32+16+8). 



^^ 



A 





Realizando las operaciones en toda; 
las filas obtenemos una serie de 8 va- 
lores, que podrian afiadirse en uns 
sentencia DATA dc la siguiente apa- 
ricncia: 

DATA 16,56;'l6,124',16,16,16,0^ , 

Inicialmente puede parecer un me 
todo algo incomodo, pero resulta, sir 
embargo, bastante rapido. Por otrc 
lado hay muchas combinaciones recu 
rrentes, tales como llllltll (255 ei 
decimal), que resultan faciles de re 
cordar. 






DEL DISENO AL 



SISTEMA BINARfO 



PASO DE BINARIO A DECIMAL 




BINARIO A HEXADECIIVIAL 
PROGRAMA PARA C-64 




BINARIO A HEXADECIMAL 

La conversion de binario a hexade- 
cimal es bastante facii. Con la ayuda 
de la siguiente tabla se realiza sin ma- 
yores complicaciones: 



0101 '.5 

0110.. 6 



Bi nario 


Hexadeci ma L 


GOOD-. ... ., 





0001 


1 


0010. 


2 


0011 


.3 


0100 


4 



0111 

1000 

1001 

1010, 

1011, 

1100, 

1101, 

1110, 

1111, 



En cste case no pueden ser ignora- 
dos los ceros. Lo primero que debe- 



raos hacer es agrupar los 8 bytes en 2 
conjuntos de 4 bits {nybble). A conti- 
nuacion se busca en la tabla ei equi- 
valente hexadecimal del numcro bina- 
rio de cuatro cifras. Se anota y vuelve 
a repetirse la operacion. El numero 
obtenido por cste procedimiento sera 
el correspondiente hexadecimal del bi- 
nario propuesto. Si volvemos al ejem- 
plo de la cruz de Lorena, la primera 
fila es: 0001 0000 = $10 (el signo S suc- 
le utilizarse para denotar el caracter 
hexadecimal). La segunda linea es: 
0011 1000 = $38, etc. - 

Repitiendo el proceso nos encontra- 

INPUT 17 



f«V9 5'" 



n 



&i"lE 



mos con una scric de numcros: 

10,38, 10,7C, 10, 10, 10,00. 

JVaturalmente que es posi'fefe escn- 
bir un programa que haga estas ope- 
raciones automaticamente, pero ese 
no es el fin del articulo. 






APLICACION COIMCRETA 



Realmente en el Commodore 64 se 
utilizan los caracteres graficos menos 
frecuentemente que los versatiles spri- 
tes, pero conviene saber definir GDUs 
de 8 por 8 pixels como un recurso de 
gran utilidad. En particular es posible 
redefinir total o parcialmente el juego 
de caracteres originalmente utilizados 
por el 64. Por poner un ejempio pro- 
ximo, es factible definir las letras mi- 
tt usculas acentuadas., que no existen 
en el repertorio del ordenador. En el 
ejempio diseiiarcmos una c acentua- 
da, que siguiendo el dibujo sobre pa- 
pel cuadriculado, arroja los siguientes 
valores: 



El esquema decimal es el que ofre- 
ce un uso mas inmediato y facil de cal- 
cular. Sin embargo no descartamos 
que puedan emplcarse los binarios y 
hexadecimal. 

Procedamos a incluir esta letra en 
nuevo juego de caracteres. 

TecLea para C-64 

10 A=12:Z=A*1024/256 

20 POKE 53272, (PEEKC53272) 




40 POKE 56334, PEEK(56334) 

AND 254 
SO POf^E t^PEEfCaJ mo 251 
60 FOR J=0 TO 56832-53248 
70 POKE A*1D24+J,PEEK(53248+ 

J) 
80 NEXT J 

90 POKE 1,PEEKC1)0R 4 
100 POKE 56334, PEEK(56334) 

OR 1 
110 SC=5:I=1024*12:FOR J=Z+- 

CSC*8) TO Z+(SC*8)+7: 

READ A$ 
120 N=0:FOR T=1 TO LEN(A$) 
130 IF M1D$CA$,T,1)="1" THEN 

N=N+2^(LEN(A$)-T) 
140 NEXT:POKE J,N:NEXT J 
500 DATA OOOtOOOO 
510 DATA OOOOtoO 
520 DATA 00>11100 
530 DATA 01100110 
540 DATA 011-11110 
550 DATA 01100000 
560 DATA OOlttlOO 
570 DATA 00000000 



Una vez que se ejecuta el progra- 
ma, no sucedera nada durante aproxi- 
madamente un minuto, pero cuando 
aparece el mensaje READY las letras 
E apareceran sustituidas por el nuevo 



B-inario Hex. Decimal 


00010000 10...... 


16 


00001000 08 


8 


00111100.... .3C 


60 


01100110 66 


...102 


01111110 7E . 


126 


01100000. ....60 


96 


00111100 3C 


.,,,.60 


00000000 00 


......0 



AND 240) OR A 
30 POKE 52,Z:P0KE 56,Z:CLR 
:A=12 
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caractcr. Lo mismo ocurre al prcsio- 
nar la tecla correspondiente a la letra. 
Si presionaraos las teclas Commodore 
y SHIFr las E perderan su acento a! 
pasar al segundo juego de caracteres 
del 64. 



■■■■ 




■■■■ 
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Para crear cualquier otro siinbolo 
grafico asodado a la E, no hay mas 
que alterar las series de unos y ceros 
en las lineas con DATA. 

Si cambiamos el valor de la variable 
SC en la linea 110, sera otro el carac- 
ter redcfinido. Por ejempio, un valor 
de 6 cambiara la F, el 7 la G, etc. En 
tal caso, convendra escribir, GOTO 
110, en lugar de RUN, que repetiria 
el lento proceso de copia del juego de 
caracteres desde la ROM a la RAM 
que ocupa las mismas direcciones dc 
memoria. 



DESCRIPCION DELPROGRAMA 



La informacion referente a los ca- 
racteres normales esta aimacenada en 
memoria ROM y por tanto no puede 
ser alterada. Sin embargo, la tecnica 
desciita se basa en copiar esta infor- 
macion en memoria RAM, sea total o 
parcialmente. De esta manera ya es 
facil manipular los bytes que definen 
el aspecto de las letras, simbolos y de- 
mas caracteres graficos. 






La primera operacion que acomete 
el programa consiste en asignar una 
cantidad de RAM suficiente para con- 
tener al nuevo conjunto de caracteres. 
El valor de A en las lineas 10 y 30, per- 
mite definir el area de memoria a uti- 
lizar, Se puede utiiizar cualquier valor 
entero comprendido entre 4 y 16. En 
el programa se ha utilizado 12, que 
apunta hacia la memoria de caracteres 
en 12288 (o lo que es igual 12*1024). 



Un valor de 4 situaria ei puntero en la 
direction 4096 (4*1024). 

La linea 30 ajusta dos punteros, el 
final del area destinada al BASIC y el 
inicio del area de cadenas. Con esto 
se consigue que el nuevo conjunto de 
caracteres no se superponga a los pro- 
gramas en BASIC deteriorandolos. 

En la linea 40 se desactiva la llama- 
da «interrupci6n para exploracion del 
teclado»- La linea 50 selecciona la 
ROM de caracteres. 

La rutina de copia desde la ROM a 




INPUT 19 




la RAM interviene en las lineas 60,70 
y 80, Los nuraeros 53248 y 56832 se re- 
fieren al comienzo y final de los gru- 
pos de ocho bloques de caracteres que 
se copian en la RAM. El programa 
realiza asi una copia integral, cam- 
biando el arco de valores atribuido 
a J. 

Una vez completa la copia, se de- 
sactiva el generador de caracteres de 
la ROM (linea 90), al tiempo que se 
reactiva la exploracion del teclado (li- 
nea 100). 

Las h'neas 110 a 140 cambian la de- 
finicion de un caracter dado (el SC), 
leyendo la serie de valores contenidos 
en las sentencias DATA (lineas 500 a 
580), convirtiendolos en valores deci- 
males (lineas 120 y ]30). 




Para ahorrar espacio, las lineas 
DATA pueden ser sustituidas por una 

sola; 

500 DATA 00010000,00001000, 
00111100,01100110,01111 
110,01100000,00111100, 
00000000 

Es notable el ahorro, pero este for- 
mato no permite evaluar facilmente el 
aspecto que tendra el caracter ni co- 
rregirlo sobre la marcha. 
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Si SC prcticrc irabajar en hexadeci- 
mal, habra que realizar la siguiente , 
modificacion: 

130 M=ASC(MrD$CA$,T,1))-48: 
N=CM+<M>9)*7)*16^(LEN 
CA$)-T)+N 

500 DATA 10,08,3C,66,7E,60, 
3C,00 
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ESTRENO MUNDIAL 



THE FINAL CAItTRIDGE 2 

EL PRIMER SISTEMA OPERATIVO EXTERNO 
PARA EL CBM 64 

AHORA, CON FREEZER COMPLETO 



(Puede cargar sus backups sin el cartucho) 



Este sistema operative construido en un cartucho no utiliza memo- 
ria alguna y esta siempre presente. Compatible con 99% 

de los programas. 



iNCORPORA 



TJRBO DISCO: Carga 6 veces mas 
rapido -salva 6 veces mas rapido - No 
Borra la pantalla. 

TURBO CINTA: 10 veces mas rapido, 
incljj^o con ficheros. Utiiiza los coman- 
dosrrtormales del Commodore (Load- 
Save- In putTr,...) 

INTERFACE CENTRONICS: Permite uti- 
lizar las impresoras de tipo paralelo. 
Imprime los graficos Commodore y los 
codigos de control. 
{Imporlante para los listados). 

VOLCADOS DE PANTALLA: De alta 
revolucion y texto. 1 pagina de ancho. 
12 tonos grises, copia pantallas de jue- 
gos o de programas como Doodle, 
Koala Pad; Print Shop, etc. Busca auto- 
maticamente la direccion en memoria. 
Funciona con impresoras Commo- 
dore y Centronics. 

24 K. MAS DESDE EL BASIC: 2 nuevps 
comandos, "memory write" y "memory 
read" mueven 192 bytes muy rapida- 
mente en cualquler sitio de los 64 RAM 
del CBM 64. Se pueden usar con cade- 
nas variables. 

COMANDOS DEL BASIC 4.0: Como 
dioad, dsave, dappend, catalog, etc. 

TECLAS DE FUNCJON TELEPROGRA- 

MADAS: Run, load, save, catalog, 
comandos de disco, list (quita Jas pro- 
tecciones contra el listado de los pro- 
gramas en BASIC). 

MONITOR DE CODIGO MAQUINA: 

Scroll iiacia arriba y abajo. 

Banksw Itching {para leer y escribir 

debajo de las ROOMS), etc.. No reside 

en memoria. Se puede llamar en cual- 

quier momento con cualquier programa 

en memoria. 

RESET: Resetea lodos los programas, 

TRAINING MODE: Para cancelar la 
deteccion de colision de sprites 
podras ir hasta el final de los juegos 
sin que te maten los bichos malos. 



+ 



SUPER FREEZER 




Ejempio de volcado de pantalla. 



jHasta el precio 

es increible! 



PTAS. 

9.900 



Pulsandq el boton del FREEZER, to- 
mara el control de su ordenador, "con- 
gelando" el programa en memoria. Con 
la ayuda de un menu muy comodo 
podra: 

— Hacer VOLCADOS DE PANTALLA, 
alta o baja resolucidn (por ejempio las 
pantallas de sus juegos preferidos). 
Podra "congelar" cualquier programa 
en el momento que desee, y volcar la 
pantalla sobre el papel. 

—Hacer COPIAS DE SEGURIDAD de 
sus programas. El FREEZER le permi- 
tira, con programas protegidos o no. 
cualquiera que sea el sistema de carga 
utilizado (tjrbo, versficacion de errores, 
entre pistas,..). 

• Hacer copias de cinta a cinta 

■ Hacer copias de cinta a disco 

■ Hacer copias de disco a cinta 

■ Hacer copias de disco a disco 
solo pulsando una lecla. El proceso de 
copia es lotalmente automatico, y no 
necesita tener ningun conocimiento de 
programacion. La copia facilitada por el 
FREEZER consta solo dedos partes (un 
cargador y el programa .propiamente 
dicho) y se puede cargar. 
INDEPENDIENTEMENTE DEL CAR- 
TUCHO (a velocidad turbo), EL 
FREEZER de THE FINAL CARTRID- 
GE 2 es mas comodo y mas rapido 
que los productos especiafizados 
ingleses o americanos probados has- 
ta ahora. 



ATENCION: Las copias consegui- 
das con THE FINAL CARTRIGE 2 
son exclusivamente para use pro- 
pio. 



NO EXISTE NINGUN PRODUCTO 
COMPARABLE PARA SU C64: Encor- 

trara quizas algiin FREEZER (con otro 

nombre) ingles o americano, pero ade- 

mas de ser mas caro sera solo jn 

FREEZER. 

THE FINAL CARTRIDGE 2 da mucho 

mas, por menos. 



DISPONIBLE EN LAS MEJORES TIENDAS O DIRECTAMENTE POR CORREO O TELEFONO 



Condiciones 

especlales para 

distribuidores 



C Coso 87-6^A-Telf (9i'6) 39 99 61 -50001 2ARAG0ZA 



caoynghi ar>0 regrstereil [raaemarl. HSP computers 
Woichaefisbocht 236 3083 MV Rniieroam NeideiianO? lEfi 



01031 102319a; Tele. ^6401 a 



Aplicaclones 



EL PROCESAMIENTO 
DE TEXTOS 



NOMBRES DE FICHEROS 



EDICION 



AJUSTE DE COLORES 



PARAMETROS DE ENTRADA Y SALIDA 
MANIPULACION DEL TEXTO 



Si quieres poner a punto tu habili- 
dad mecanograflica a expensas de un 
procesador de textos hecho y derecho, 
la respuesta la tienes en este editor de 
textos de facil programacion. 

Ya conoces las ventajas del proce- 
sado de textos. Realmente esta es una 
de las aplicaclones mas utiles de los or- 
denadores domesticos. Para conseguir 
los mejores resultados, puedes com- 
prarte el software existente en codigo 
maquina, pero normalmente esta dise- 
nado para uses profesionales y puede 
resultar muy caro. 

La parte de programa que presen- 
tamos en este articulo presenta un 
buen esditor de textos para quien da 
sus primeros pasos en este terreno, 
permitiendole adquirir una sensacion 
real de como son los programas de 
este tipo. 

Con este programa puedes crear in- 
formes, cartas o cualquier otra forma 
de correspondencia. Naturalmente la 
salida se hace a traves de la impreso- 
ra. El texto puede ser almacenado en 
cinta o disco y puede recuperarse para 
su posterior utilizacion, ya sea por este 
programa o cualquier otro que haga 
use de los ficheros secuenciales crea- 
dos con los datos. 

Debido a la longitud del programa 
complete — no menos de 7,5K — el 
programa se ha fraccionado en dos 
unidades para hacer mas facil su diges- 
tion, y no funcionara adecuadamente 
hasta que se haya introducido la ulti- 
ma parte. Sin embargo, despues de in- 
troducir la primera parte ya estaras en 
condiciones de crear ficheros de tex- 
to. La segunda parte contiene la ruti- 
na de impresora, que evidentemente 
necesitaras para obtener copias de tus 
escritos. Tambicn sc incluycn unas fa- 
cilidades de ordenacion y busqueda, 
asi como una opcion para hacer mo- 
delos de cartas. 

La extension del programa hace que 
no pueda ejecutarse con el Vic 20 sin 
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ampliacion dc memoria. Debido a 
esto, y a que la pantalla del Vic solo 
presentaria una pequena cantidad de 
texto, no incluiremos la version para 
el Vic. 

Antes de introducir la primera par- 
te del programa, echemos una ojeada 
a la forma en que se utiliza. Se ha cort- 
figurado de una forma que resulte de 
use comodo en la mayoria de las apli- 
caciones domesticas, pero como ocu- 
rre con todo programa de este tipo 
puedes modificar el contenido de los 
diversos mentis y mensajes de panta- 
lla para que se adapten a tus necesi- 
dades o a tus preferencias. No obstan- 
te, si decides realizar dicha modifica- 
cion, deberas respetar las mismas con- 
venciones de numeraci6n de Iineas 
para que el programa se enlace correc- 
tamente con otros modulos, especial- 
mente cuando se le anadan otros mo- 
dulos. 



EL MENU PRINCIPAL 

En cuanto ejecutes (con RUN) la 
version completa de la copia del pro- 
grama, te aparecera un mensaje en 
pantalla invitandotc a seleccionar las 
opciones de entrada y salida. Con ellas 
el sistema queda configurado para uti- 
lizar cinta o disco, lo cual se hace te- 
cleando C 6 D. 

Observa como puedes utilizar un 
dispositivo de entrada y otro distinto 
de salida, y cambiar despues dichos 
dispositivos cuando quieras. 

Seguidamente te aparecera el menu 
general. 

[S]AVE (Guardar) 

[C]LEAR (Borrar) 

LOAD 



Si quieres seguir trabajando sobre 
un fichero de texto ya existente, que 



anteriormcnte habias guardado (coi 
el comando SAVE), pulsa L para 
arrancar la rutina de carga. Como el] 
texto se va a escribir sobre cualquier 
texto que tengas en memoria, el pro- 
grama te enviara un mensaje de «Es- 
tas seguro?». Para continuar, pulsa Y;| 
si quieres abortar el proceso, pulsc 
cualquier otra tecla. Seguidamente tej 
pedira el nombre de un fichero y ten- 
dras que proporcionarselo para que ell 
proceso contintie. El fichero de textoj 
cuyo nombre hayas tecleado, sera car- 
gado en la memoria y ya puedes traTJ 
bajar sobre el a tu antojo. 




Aplicoc'one; 



SAVE 



La rutina SAVE se utiliza para ia 
Creadon de ficheros secuenciales para 
almacenamiento de datos. Cuando se- 
lecciones esta opcioii pulsando la tecla 
S, lo primero que te pedira el progra- 
raa es un nombre de fichero. No se 
aceptara una entrada nula. El sistema 
ya «sabe» el dispositive que estas uti- 
lizando y continua enviandote mensa- 
jes en consecuencia, acerca de la pre- 
paracion de la cinta o la unidad de dis- 
co. Por ultimo, pulsa |return| para 
que se efectue la operacion de almace- 
namiento. 

Para almacenar los ficheros en dis- 
co, tendras que utilizar el procedi- 
miento de escribir «@0:nombre» ex- 
cepto en los casos en que no importe 
que el fichero de texto se escriba so- 
bre el ultimo con el que trabajaste. 



Sc pucdcn anadir otras rutinas adi- 
cionales de SAVE que permitan la 
proteccion de los ficheros, el cambio 
de nombre o su sustitucion. En el lis- 
tado que prcsentaremos en nuestro 
proximo articulo podras examinar va- 
rias rutinas de mucstra. 

ENTRADA/SALIDA 

Si por cualquier razoTi decides mo- 
dificar los parametros iniciales de en- 
trada/salida, pucdes hacerlo en cual- 
quier momento seleccionando la op- 
cion I en el menu principal. Teclca tu 
eleccion y automaticamente se selec- 
cionara el programa para la nueva 
configuracion. 

MODO DE EDICIGN 

Si sclcccionas H en el menu princi- 
pal, entras en el modo de edicion y te 
aparecera un menu secundario. 




Puedes seleccionar una de las pri- 
mcras opciones para trasladarte al 
principio o al final del texto que tie- 
nes en memoria. Si utilizas la tercera 
opcion, puedes voiver a la ultima h'nea 
editada o salir al menii principal. 

Con la opcion COLOR puedes 
ajustar a tu gusto la «tinta», e! «papel» 
y el borde de paiitalla. 

Cada una de las tres primeras op- 
ciones te situa en un modo de entra- 
da. La pantalla presenta las lineas del 
principio o el final del texto (sdk) pue- 
de presenter a un tiempo una de las 
dos cosas si ya tienes algo en memo- 
ria). Cerca de la parte inferior de la 
pantalla hay una «zona dc trabajo» se- 
parada. 

El texto introducjdo en la zona in- 
ferior se transfiere a la memoria y a la 
zona de pantalla cuando se pulsa [RE- 
TURN | , o de forma automatica cuan- 
do se han completado dos lineas de 
pantalla. 

El programa lleva incorporadas va- 
rias utilidades de edicion. Toda la la- 
bor de edicion e introduccion tiene lu- 
gar en la zona de trabajo. 

Los controles de edicion te permi- 
ten desplazarte hacia adelante y hacia 
atras a lo largo de la linea de texto del 
area de trabajo para insertar o supri- 
mir caracteres antes de que el texto 
sea transferido a la memoria. . 

En otras palabras, el texto que ya 
esta en memoria, representado en la 
parte alta de la pantalla, tiene que ser 
copiado h'nea a linea a la zona de tra- 
bajo para poder trabajar sobre el. 

Pucdes introducir nucvas lineas en 
cualquier parte del cuerpo principal 
del texto. Para hacerlo, pulsa la tecla 
adccuada del modo «editor» (consulta 
las instrucciones detalladas) y coloca 
la marca debajo del punto donde quie- 
ras insertar la nueva h'nea. 

Tambien puedes suprimir texto li- 
nea a linea entrando en el modo edi- 
tor y colocando nuevamente la marca 
debajo de la h'nea que quieras borrar 
antes de pulsar la tecla adecuada de 
borrado. 

Las teclas de control te permiten 
saltar hacia adelante o hacia atras en 
el texto que tienes en memoria, de 
diez en diez lineas. 

INPUT 23 



Aplicaciones 



Para volver al menu del modo edi- 
tor, pulsa la tecla de escape adecua- 
da y desde alli al menu principal para 
modificar cualquiera de los parame- 
tros del sistema. 

BORRADO 

Otra de las funciones disponibles en 
el menu principal es el borrado de la 
memoria, pero solo despues de que 
hayas respondido «si» al mensaje «Es- 
tas seguro?» que te aparecera en pan- 
talla en cuanto pulses la tecla B. Ten 
en cuenta que esta opcion no iniciali- 
za los parametros de entrada/salida ni 
la impresora. Si quieres arrancar de 
nuevo desde cero, pulsa F para salir 
totalmente del programa, con lo que 
se produce una inicializacion comple- 
ta del sistema al ordenador al BASIC. 

Cuando hayas tecleado la parte de 
programa que figura al final de! arti- 
culo, podras hacer pleno use de las fa- 
cilidades de edicidn que dicho progra- 
ma te ofrece. Pero recuerda que no 
podras imprimir ningun texto hasta 
que hayas introducido la ultima parte 
del programa, que publicaremos en el 
siguiente capitulo de esta breve serie. 

Como el arte de escribir cartas se ha 
convertido en una cosa del pasado, en- 
contraras que las facilidades de edi- 
cion que ofrece el editor de textos re- 
suhan de gran ayuda a muchos nive- 
les. En el nivel mas sencillo, puedes 
hacer correcciones ortograficas des- 
plazando tu plumilla electronica — el 
cursor — a la palabra equivocada, y su- 
primiendo o insertando los caracteres 
adecuados. \ 

Si las faltas de ortografia no son un'> 
problema para ti, pero en cambio te 
parece problematica la redaccion de 
un texto, especialmente si se trata de 
una carta importante, tal como una 
instancia para solicitar un empleo o 
una carta al director de tu banco para 
explicarle las razones por las que inad- 
vertidamente has incurrido en un des- 
cubierto de tu cuenta corriente, en tal 
caso este programa te resultara ideal. 
Al escribir una carta, puede ser que 
termines por gastar una gran cantidad 
de hojas en tu esfuerzo por encontrar 
las palabras adecuadas; normatoente 
las primeras frases suelen sej:^j:|is . gue 
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mas dificultades presentan. Si realizas 
la composicion directamente sobre el 
teclado de tu ordenador, mantendras 
tu papelera vacia y tu humor intacto. 
En vez de pasar penas esforzandote en 
encontrar la forma correcta de empe- 
zar, puedes limitarte simplemente a 
hacer un borrador de tu carta. Des- 
pues puedes analizar lo que has escri- 
to, examinando el texto hacia arriba y 
hacia abajo. Una vez que hayas deci- 
dido lo que tienes que corregir o su- 
primir puedes borrar e insertar pala- 
bras o frases hasta que finalmente lle- 
gues a tener una composicion perfec- 
ta. 

Una ventaja adicional de componer 
directamente en pantaUa es que pue- 
des archivar la carta para usarla otra 
vez, o simplemente para tener una co- 
pia de lo que en ella decias. 

Las utilidades contenidas dentro de 
este programa son analogas, aunque 
bastante mcnos sofisticadas, a las de 



las modernas maquinas de fotocompo- 
sicion que se utilizan para la produc- 
cion de pubhcaciones como INPUT. Si 
conoces los metodos de composicion 
utilizados antes de que se inventara la 
maquina de fotocomposicion, te resul- 
tara facil apreciar las ventajas que te 
ofrece un'paquete de utilidades de 
este tipo. 

El procedimiento de utilizacion dc 
este programa sigue las lineas genera- 
tes anteriormente citadas. Las utilida- 
des de edicion en pantaila que trae el 
Commodore 64 son muy eficaces y se 
conservan en este editor de textos. 
Pero cuando pases al modo de edi- 
cion, los controles de edicion pasaran 
en gran parte a las teclas de funciones, 
algunas de las cuales se utihzan para 
las funciones extra asociadas con la ru- 
tina de impresora. 

La creacion y modificacidn de texto 
tienc lugar en el area de trabajo pro- 




Aplieaciones 



ximo al fondo de la pantalla. En la 
parte superior de la pantalla se visua- 
liza el texto que permanece almacena- 
do en la memoria. Ei borrado e inser- 

cion de texto se hace de la forma acos- 
tumbrada utilizando las teclas IinstI 



I shift! o I del I , despues de situar el 
cursor con las teclas de | CRSR I a iz- 
quierda y derecha. La escritura se pro- 
ducira sobre los caracteres ya existen- 
tes a menos que utilices el modo de in- 
sercion. pulsando la tecla [B] . 

El alraacenamiento del texto en la 
memoria y su presentacidrt en la parte 
superior de la pantalla se produce pul- 
sando la tecla I RETURN I . En cual- 
quier momento puedes acceder a di- 
cho texto introduciendo el modo «edi- 
tor» mediante pulsacion de la tecla 
[fl] . La marca * indica el punto de 
texto a que tienes acceso en cada mo- 
mento. Para transferir al area de tra- 
bajo la linea de texto que esta encima 




de la marca, pulsa la tecla f3 ;acon- 
tinuacion ya puedes editar de la forma 
acostumbrada. 

Para borrar una linea de texto que 
este almacenada en la memoria, pasa 
al modo editor, situa la marca inme- 
diatamente por encima de la linea que 
quieres suprimir y pulsa la tecla 
I INST/DEL I . Si quieres tener una linea 
en bianco, pulsa simultaneamente 
I INST I y ISHIFTI , o bien pulsa ( RE- 
TURN] sin introducir texto alguno en 
la zona de trabajo. 

En el modo de edicion, puedes vi- 
sualizar el contenido de la memoria 
pulsando [fl] , seguido de ICRSRl arri- 
ba o abajo con o sin 1 shift | para mo- 
verte en una u otra direccion desde la 
posicion de la marca a la que siempre 
vuelve el modo editor. 

Puedes saltar hacia arriba de cinco 
en cinco lineas pulsando la tecla de fle- 
cha hacia arriba, o hacia abajo de cin- 
co en cinco hneas, con la tecla de des- 
plazamiento hacia la izquierda. 

Para salir de los modes editor o de 
introduccion (sucesivamente) , pulsa 
El texto que esta almacenado en 
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la memoria no se vera afectado por 
ello. 



para Commodore-64 



1 REM**nsIGNIFICA ESPACIO 

2 rem**este tratamiento de 
texto no tiene como 

3 rem**objetivo sustituir a 
pr06ramas comerciales 

10 print"Cshift+clr/home: 

cctrl+8:";chr$(8) 
20 poke 53280,6: poke 53281,0 
30 dimtx$c501):ow=0:em=0: 

DN=4 

35 gc$="[:clr/home: 

i:23*CRSR abajo]" 
40 BL$=CHR$(160):TL=1:CP=1: 

MW=8D : TW=60 : PL=60 : TH=40 : 

GP=10:LF$=CHR$(13)+ 

CHR$C135 
42 LF$=LF$+CHR$(13):G0SUB 

5000 

50 tx$(0)="lctrl+a:ectrl+9:" 
:sw$="":for f=0t039:tx$ 

<0>=TX$(0>+"+":SW$=SW$+ 
"i:C0MM+Y3":NEXTF 
55 FOR Z=1 TO 40:SP$=SP$+" " 
:NEXT 



60 TX$CO)=TXS(0) + "i:CTRL+0] 
CCTRL+83":TX$(1)="CCTRL+9: 
CCTRL+4:!:9*C0Mm-5l3. 
L9*COMM-«-5): , :9*C0MM+5):] . 

:9*coMM+an.i:cTRL+o] 

CCTRL+S:" 

70 PRINTCHR$C142) 

71 PRINT"tSHIFT+CLR/HOME] 
rCRSR abajoKCTRL+9r'TAB 

(15);":ctrl+4:henu PRIN 

CIPALi:CTRL+8:":PRINT 
•T2*CRSR abajo:";TAB(14); 
"CCTRL+9DLCCTRL+03OAD 
IICRSR abajo3" 

72 PRINTTABC14)"[CTRL+9aS 
CCTRL+OJAVECCRSR abajoH": 
PRINTTAB(14)"i:CTRL+9]C 
CCTRL+OJAMBIO E/S 

LCRSR abajoJ" 

80 PRINTTAB(14)"[CTRL+9:e 
CCTRL+0:dITAR:CRSR abajoJ" 
:PRINTTABC14)"[:CTRL+9DB 
CCTRL+ODORRAR MEMORIA 
CCRSR abajo]" 

81 PRINTTAB(14)"t:CTRL+9Jl 

cctrl+o:mprimir 

CCRSR abajo]" 

82 PRINTTAB(14)"i:CTRL+93A 
CCTRL+O^LTERAR IMPRESORA 
CCRSR abajo]":PRINT 
TABC14)"CCTRL+93FCCTRL+0: 
IN DEL PR06RAMA 

CCRSR abajo]" 
85 PRINTTAB(12) "CCRSR abajo] 

CCTRL+9]CCTRL+4]C]C: 

selecciona una OPCIONC]C] 

CCTRL+8]" 
90 GET B$:IFB$=""THEN 90 
100 B=0:F0RF=1T08:IF B$=MID$ 
("LSCEBIAF",F,1)THEN B=F 
102 NEXT F:1F B=0 THEN 90 
110 ON B 60SUB 4500,4000, 

5000,1000,160,3000,5500, 

130 

120 GOTO 70 

150 PRINT QD$;TABC15); 

"CCRSR arriba]CCTRL+9] 
CCTRL+43ESTAS SEGURO 
(S/N)?" • ■ 

140 GET R$:IF R$<>"S"AND R$ 

<>"N" THEN 140 
150 IF R$="$"THEN PRINT 

"CSHIFT+CLR/HOME]":END 

155 RETURN 

160 PRINT"CSHIFT+CLR/H0HE] 



1001 



1002 



1522 

1530 
1540 

1550 

1551 
1555 
1560 



CCRSR aba3o::CTRL+91"; 
TABC13);"i:CTRL+4lB0RRAR 
MEIviORIACCTRL+83": PRINT 
TAB(10)"CCRSR abajo:i 
CCRSR abajoDESTAS SEGURO 
(S/N)?" 
170 GET B$:IF B$<>"S" AND B$ 

<>'*N" THEN 170 
180 IF B$^"N" THEN RETURN 
190 IF TL=1 THEN RETURN 
195 FOR K=1 TO TL-1:TX$(K)= 
"":NEXT:TX$C1)=TX$(TU : 
TX$="":TL=1 : CP=1 :RETURN 
1000 PRINT CHRSCU) 

•TSHIFT+CLR/HOME] 
CCTRL+N] CCRSR abajoD 
•. ' CCTRL+9y';TAB(15);" 

cctrl+a:cshift+e]ditar 
cshift+t3ext0cctrl+81" 

PRINT'TCRSR abajo] 
CCRSR abaio3"TABC14); 
"CCTRL+9DCSHIFT+C] 
CCTRL+0:OMIENZ0 DEL 
TEXTO" 

PRINT TAB(14);" 
.. CCRSR abajoJCCTRL+9: 
CSHIFT+FDCCTRL+ODINAL 
DEL TEXTO":PRINTTAB(U) 
"CCRSR abajonCCTRL+9:i 
CSHIFT+SUCCTRL+OJIGUI 
ENTE LINEA DE TEXTO" 

1004 PRINT TAB(14)" 

CCRSR abajo:CCTRL+93 
CSHIFT+M3CCTRL+0JENU 
PRINCIPAL" 

1010 GETB$:IF B$=""THEN 
1010 

1020 B=0:FORF=1T04:IF B$= 
MID$("CFSM",F^1)THEN 
B=F:GOTO 1030 

1022 NEXT F:GOTO 1010 

1030 ON B GOTO 1050,1060, 

1070,1080 
1040 IF TL=<3 OR CP=1 THEN 

1070 
1050 CP=1:G0T0 1070 
1060 CP=TL 
1070 PRINT"CSHIFT+CLR/HOME]" 

:GOSUB 2090:G0SUB 1500: 

GOTO 1000 
1080 RETURN 
1500 A$=" ":P=0 
1505 IF EM=1 THEN 2500 
1510 POKE 198,0 




CH=PEEK(1904+P):GET T$ 1561 

IF LENCA$3=81 OR T$= 

CHR$C13)THEN GOSUB 2000 

:GOTO 1515 1562 

CH=CCH+128)AND 255:P0KE 

1904+P,CH:CH=CCH+128) 

AND 255:POKE 1904+P,CH 1563 

IFT$=""OR T$=CHR$C34) 

THEN 1520 1564 

IF T$="CCRSR arriba:" 

OR T$="CCRSR abajo:*' 

THEN 1520 1565 

IF P<LENCA$)-1 AND T$= 

CHR$C10) THEN A$=LEFT$ 

(A$,P)+MID$CA$,P+2): 1567 

GOTO 1600 

IF T$=CHR$C10) THEN 1570 

1520 1572 

IF T$=CHR$C136) THEN 

RETURN 1575 

IF T$=CHR$C134) AND CP 

=1 THEN 1520 , 



IF T$=CHR$(134) THEN 
A$=TX$(CP-1)+" ":T$="": 
P=0:G0SUB2090:G0T0 1510 
IF T$=CHR$(135) THEN OW 
=ABS(1-0W):G0SUB 2090: 
GOTO 1510 

IF t$="cclr/home:" then 

CP=1: GOSUB 2090 

IF T$=CHR$(1333 THEN EM 

=1:PM=CP:G0SUB 2090: 

GOTO 1505 

IF T$="CSHIFT+CLR/H0ME3 

•• THEN GOSUB 2D90:G0TO 

1500 

IF T$<>CHR$C20) THEN 

1580 

IF P=0 THEN 1510 

A$=LEFT$CA$,P-1)+MID$ 

CA$,P+1):P=P-1 

PRINT LEFT$CGC$,23);: 

FOR F=1 TO LEN(A$)-2: 

PRINT "CCRSR dcha.3";: 



1515 PRINT LEFT$CGC$,23)A$; 




ae INPUT 



Aplicacion^ 



NEXT 
1577 PRINT"C][]":GOTO 1510 
1580 KJ=0:IF T$=CHR$(148) 

THEN T$=" ":KJ=1 
1582 IF T$<>CHR$<157) AND 

T$<>CHR$C29)AND ASC(T$) 

<32 THEN 1510 

1590 IF T$=CHR$C29) OR T$= 
CHR$(157) THEN 1610 

1591 IF 0U=1 AND JOl THEN 
1595 

1593 A$=LEFT$(A$^P)+T$+MID$ 

CA$,P+1):P=P+1:G0T0 

1600 
1595 B$=A$:A$=LEFT$CA$,P)+T$ 

+MID$(A$,P+2) 
1598 P=P+1:A$=A$4-" " 
1600 PRINT LEFT$(GC$,23:)A$; 
1610 IF T$=CHR$(29) AND DP< 

LEN(A$>-1 THEN P=P+1 
1620 IF(T$=CHR$(157)AND P>0) 

OR KJ=1 THENLIST1630 




1630 


GOTO 1520 




EDICION=";EM:PRINT 


1700 


IF CP=1 THEN 1510 




":CTRL+6:"SW$":CTRL+8J" 


1710 


CP=CP-1:F0R F=CP TO TL: 




;: RETURN 




TX$(F)=TX$(F+1):NEXT: 


2500 


IF CP<5 THEN PM=CP 




TL=TL-1 


2510 


GET TB$:IF TB$=""THEN 


1720 


GOSUB 2090 




2510 


1730 


GOTO 1510 


2512 


IF PM=1 AND TB$= 


1800 


IF TL>499 THEN 1510 




"ECRSR arriba]" THEN 


1810 


FOR F=TL+1 TO CP+1 STEP 




2510 




-1:TX$(F)=TX$(F-1):NEXT 


2520 


IF PM>1 AND TB$= 




:TL=TL+1:TX$(CP)="" 




"CCRSR arribal" THEN PR 


1820 


GOSUB 209O:GOT0 1510 




=PM-1:CP=PM:G0T0 2550 


2000 


X=0:IF TL>499 THEN 2060 


2525 


IF PM<TL AND TB$= 


2001 


IF LENCA$)<41 THEN TT$ 




"CCRSR abajo^' THEN PM= 




(X)=LEFT$(A$,LEN(A$)-1) 




PM+1:CP=PM:G0TO 2550 




:A$="":G0T0 2030 


2530 


IF PM>5 AND TB$="[:fLECHA 


2010 


FOR 1=41 TO 1 STEP-1:IF 




arriba" THEN PM=PM-5:CP= 




MID$(A$,I,1)<>" "THEN 




PM:G0T0 2550 




NEXT: 1=41 


2535 


IF PM<TL-5 AND TB$= 


2020 


TT$CX)=LEFT$(A$,40) :A$ 




•'[FLECHA izq.l" THEN PM= 




=MID$CA$,41) 




PM+5:CP=PM:G0TO 2550 


2030 


X=X+1:IF A$<>""AND A$<> 


2540 


GOTO 2560 




" " THEN 2001 


2550 


GOSUB 2O90:G0TO 2510 


2040 


FOR I=TL+X TO CP+X STEP 


2560 


IF TB$=CHR$(136) THEN EM 




-1:TX$(I)=TX$(I-X): 




=0:G0SUB 2090:GOT0 1505 




NEXT I 


2570 


IF TB$<>CHR$(148) THEN 


2050 


FOR 1=0 TO X-1:TXSCCP+ 




2580 




I)=TT$CI):NEXT I 


2571 


IF CP<1 THEN 2510 


2060 


A$=" ":P=0:PRINT LEFTS 


2572 


FOR K=TL+1 TO PM+I STEP 




(GC$,23)A$; 




-1 :TX$=TX$(K-1) :NEXT:TL 


2080 


TL=TL+X:CP=CP+X 




=TL+1:TX$CPM)="" 


2090 


IF CP<15 THEN S1=0:GOTO 


2573 


GOSUB 2090:G0T0 2510 




2100 


2580 


IF TB$<>CHR$C20) THEN 


2095 


S1=CP-15 




2590 


2100 


PRINT"CSHIFT+CLR/ HOMED" 


2581 


IF PM=TL THEN 2510 




;:FOR K=S1 TO Sl+15: 


2582 


FOR K=PM TO TL:TX$CK)= 




PRINT TX$(K);:IF LEN 




TX$CK+1):NEXT:TL=TL-1 




CTX$(K))<40 THEN PRINT 


2583 


TX$(TL+1)="":60SUB 2090 




CHR$C160) 




:GOTO 2590 


2110 


IF K=CP"1 THEN PRINT 


2584 


CP=CP-1 




"CCOMM+7JnCTRL+91[] 


2590 


IF TB$="a"THEN SF=SF+1 : 




[CTRL+OJCCTRL+8]" 




IF SF=1 THEN SS=CP: 


2120 


NEXT 




GOTO 2510 


2122 


PRINT"CCTRL+9] CFLECHA 


2600 


IF SF=2 THEN SE=CP:SF=0 




izq.J"SP$":CTRL+4J0 




:GOSUB 5130:G0TO 2510 




CC0MM+7]123456789 


2610 


IF TB$="S"THEN GOSUB 




CCTRL+4]0CC0MM+7:i 23456 




5070 




789i:CTRL+4]0CC0MM+7:i23 


2620 


GOTO 2510 




456789i:CTRL+4]0CCOMM+7: 


3000 


IF TL<2 THEN 3050 




123456789CCTRL+8: 


3010 


print'tshift+clr/home: 




CCTRL+03"; 




[CRSR abajo:ECTRL+9n" 


2130 


PRINT'TCTRL+5JMEM LIBRE 




TAB(12)":cTRL+4]RUTINA 




= i:COMM+6:";40*C501-TL); 




DE IMPRESORACCTRL+8]": 


2140 


PRINT'TC0MM+6JM0D0 0/W= 




CL0SE4 




CC0MM+6r'0W"CC0MM+6: 


3020 


PR1NT"[:2*CRSR abajo] 

INPUT 27 



Aplkaeiones 



CCRSR dcha.DDESDE 

[:ctrl+9:mcctrl+o]emoria 
desde [:ctrl+93f 
[ctrl+03ichero?" 
get r$:if r$<>"m" and 

R$<>"F" THEN 3030 
3040 IF R$="M" THEN 3060 



3030 



3050 GOSUB 4500 

3060 IF TL=1 THEN PRINT TAB 

C11)"C3*CRSR abajo: 

[CTRL+9]CCTRL+43N0 HAY 3080 

FICHERO EN MEMORIA 

[CTRL+8]":GQT0 3570 3090 

3070 KF-0:PRINT "CCRSR dcha.] 3100 




ECRSR abajoJLLENA 

BLOQUES VARIABLES 

(S/N)?" 

GET R$:IF R$<>"S" AND 

R$<>"N" THEN 3080 

IF R$="N" THEN 3150 

PRINT.-PRINT 'TCRSR 

abajoUCCRSR dcha.^ 

ECTRL+9:]Ti:CTRL+0DECLADO 

[:CTRL+93F[CTRL+0] 

ICHERO?" 

GET R$:IF R$<>"T" AND 

R$<>"F" THEN 3110 

K=2:IF R$="T" THEN KF^^I 

:GOTO 3150 



INPUT'TCRSR abajo] 

ESCRIBE NOMBRE DEL 

FICHERO"; VB$:VB$=LEFT$ 

CVB$,16) 

IF LEFT$(VB$,1)<A OR 

LEFT$CVB$,1)>"Z" THEN 

3130 

PRINT'TSHIFT+CLR/HOMEH 

QUIERES CAMBIAR LA 

IMPRESORACS/N)?" 

GET RS:IF R$<>"S" AND 

R$<>"N" THEN 3160 

IF R$="S" THEN GOSUB 

3160 

PRINT"CSHIFT+CLR/HOME]" 

VB=0:PP=0:AS=0:LC=1 : 

PRINT"QUIERES VER LA 

SALIDA POR PANTALLA"; 

PRINT(S/N).<RETURN> 

PARA VOLVER AL MENU 

PRINCIPAL":BL=0 

GET R$:IF R$<>"S" AND 

R$<>"N" AND RZT$<>CHR$ 

(13) THEN 3200 

IF R$=CHR$C13) THEN 

RETURN 

IF R$="N" THEN P=DW: 

0PEN4,P,7, "CCRSR abajol 

":GOTO 3220 

OPEN 3,4:PRINT CHRSCU) 

IF KF02 THEN 3240 



28 INPUT 



Aplicaciones 



3230 IF DL=1 AND KF=2 THEN 
3232 

3231 IF KF=2 THEN 3236 

3232 OPEN 2,8,2, VB$+"S,R": 
INPUT#2,DV,DV:G0T0 3240 

3236 OPEN 1,1,0:INPUT#1, 
DV,DV 

3240 GP$="":IF R$="N" THEN 
FOR F=1 TO GP:GP$=GP$+ 
" ":NEXT 

3250 FOR K=1 TO L-1 

3252 IF LEFT$CTX$CK),1)="#" 
AND LENCTX$(K3)-1>AS 
THEN AS=LENCTX$(K)) 

3260 NEXT:IF AS>TW THEN 

PRINT "ERROR:DIRECCI0N 
MUY LAR6A":G0T0 3570 

3270 K=1:PRINT#4,LF$;GP$;: 

AS$="":IFAS>OTHEN FOR F 
^1 TO GP+TW-AS:AS$=AS$+ 
" ":NEXT 

3280 TT$=TX$(K) 

3290 IF T$=^""THEN PRINT#4, 
CHR$C13);GP$;:PP=0:LC= 
LC+1 :GOSUB 3590:GOT0 




3520 3302 NEXT F 

3300 BP=0:FOR F=1 TO LEN 3304 IF BP=0 OR KF=0 THEN 

CTT$):IF MID$CTT$,F,2)= 3390 

"K"THEN BP=F:GOT0 3304 3310 IF KF=1 THEN 3370 







ensutvogar-^^ 



(660 Ptas.) ,.^^1 l^^SS^L-, 
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INPUT 29 



Aplicaciones 



332D 
3330 

3340 
3350 



3360 
3362 
3370 



3380 
3390 

3391 

3400 



3410 
3420 



IF DL=1 THEN 3360 

IF ST=64 THEN 3350 3421 

INPUT#1,RP$:G0T0 3380 

PRINT"ERROR-NO HAY SUFI 

CIENTES DATOS EN EL 3430 

FICHERO":GOTO 3570 

IF ST=64 THEN 3350 3440 

INPUT#2,RP$:G0T0 3380 

BL=BL+1 : PRINT:RP$="": 

PRINT"ESCRIBE BLOQUE 3450 

VARIABLES";BL;: INPUT 

RP$ 

TT$=LEFT£CTT$^BP-1)+RP$ 

+MID$CTT$,BP+2) :GOTO 3452 

3300 

CF=0:FOR F=1 TO 4:IF 3454 

LEFT$(TT$^1)=MI1>$C"SS*# 3460 

'VF^D THEN CF=F 

NEXT F:ON CF GOTO 3460, 

3470,3490,3510 

IF PP+LENCTT$)<=TW THEN 3465 

PRINT#4,TT$;:PP=PP+LEN 3470 

(TT$):GOTO 3520 

TA$=LEFT$(TT$,TW-PP) 

CF=0:FOR F=1 TO LENCTTS) 3471 

:IF MID$(TT$,F1)=" " 



THEN CF=F:60T0 3422 
NEXT F:IF CF>TW THEN 
PRINT"ERROR-PALABRA MUY 
LARGA EN ";TT$:GOT0 3570 
IF RIGHT$(TA$,1)=" " 
THEN 3450 

IF LENCTA$>0 THEN TA$= 
LEFT$(TA$,LEN(TA$)-1): 
GOTO 3430 

PRINT#4,TA$;CHR$(13); 
GP$;:PP=0:LC=LC+1 :GOSUB 
3590:TT$=MID$CTT$,LEN 

CTA$)+1) 

IF TT$<>""THEN BP=1 : 

GOTO 3400 

GOTO 3520 

PRINT#4,CHR$(13);CHR$ 

(13);GP$;:PP=0:LC=LC+1: 

GOSUB 3590:TT$=MID$(TT$ 

,2):GOT0 3300 

GOTO 3300 

TT$=MID$CTT$,2):PRINT#4 

,CHR$C13);GP$;:IF PP<> 

TW THEN 3479 

FOR F=1 TO INTCTX/2): 

GOTO 3480 



Si se Ic hace difidi entontrar UXPUT 

en tu kiosco habitual, 

rescrvaio por adelantado, o haznoslo saber 

para que podamos remediarlo 



3479 PP=0 

3480 LC=LC-H:G0SUB 3590:GOTO 

3300 

3490 TT$=MID$(TT$,2) :IF LEN 
(TT$)<=TW THEN 3500 

3491 PRINT"ERR0R-N0 SE PUEDE 
CENTRAR"TT$:G0TO 3520 

3500 PRINT#4,CHR$(13);GP$;: 
FOR F=1 TO INTCCTW-LEN 
CTT$))/2):PRINT#," "; : 
NEXT 

3501 PRINT#4,TT$ 

3506 PRINTff4,CHR$C13);GP$;: 

PP=0:LC=LC+1:G0SUB 3590 

:G0TO 3520 
3510 PRINT#4,CHR$C13);AS$; 

MID$CTT$,2);:PP=0:LC=LC 

+1 :GOSUB 3590 
3520 K=K+1:IF P=3 THEN FOR Z 

=1 TO 500:NEXT 
3530 IF K<TL THEN 3280 

3540 IF P03 THEN PRINT#4, 
LF$;LF$:GOT0 3550 

3541 PRINTrPRINT 

3550 FOR Z=1 TO 4:CL0SE Z: 
NEXT Z 

3560 IF P=0 THEN 3190 

3561 RETURN 

3570 FOR Z=1 TO 3000:NEXT: 
FOR Z=1 TO 8:CL0SE Z: 
NEXT Z 

3580 RETURN 

3590 IF OTH THEN PRINT#4, 
LF$;LF$;GP$;:LC=1 

3600 RETURN 

5000 RETURN 



LA 
REBACCIONi 
G/LMBIA ' 




DIRECX!IDN 



— Paseo— 

dela 
Castellana 

Of 93 
plaiita,14 

28046 
-Madrid- 



30 INPUT 



Gi5}®@Q/A\Qi]fiieQ®ffl m ms&m 



LA APROXIMACION 
FINAL 



RUTINA DE CONTROL DEL TECLADO 



COMPROBACION DE ATERRIZAJE 
SOBRE LA PISTA 



CHOQUES 



ESTIMACION DE DANOS 




Quita el piloto automatico, pero no 
exhales todavia el suspiro de alivio: 
aun tienes los mandos. Utilizando uni- 
camente seis tedas debes conseguir que 
el avion se pose suavemente sobre la 
tierra 

Con esta tercera y ultima parte del 
programa simulador de vuelo tendras 
por fin el control del aparato. 

Hay tres pares de teclas que te per- 
mitcn aumentar y disminuir la veloci- 
dad del motor, hacer que el avion vire 
o que suba y baje. 

Te encontraras situado a 20000 me- 
tres de la pista de aterrizaje y a 2000 



metres de altura. No es facil manejar 
un avion, en especial si eres un piloto 
inexperto. No esperes convertirte en 
experto con unos cuantos vuelos, la 
capacidad de pilotar un avion es una 
habilidad que muy pocos adquieren en 
poco tiempo y con facilidad. 

Cuando vayas perseverando y ad- 
quiriendo mas experiencia en el con- 
trol de la aeronave, tus maniobras de 
aterrizaje iran mejorando. Despues de 
cada aterrizaje (o cada accidente) re- 
cibiras un informe con los detalles fi- 
nales del vuelo. Estudialo para ver 
que es lo que has hecho mal, e inten- 
ta corregir las deficiencias. 



El simulador de vuelo solo necesita 
unas cuantas lineas mas para estar 
completo. No te olvides de utilizar el 
cartucho del Simon's BASIC. 



r-fi-ipjit^J para C-64 

3000 GET K$:IF K$=""THEN 

RETURN 
3010 IF K$="S" AND TC>_2 

THEN TC=TC-.2 
3020 IF K$="F" AND TC<8.8 

THEN TC=TC+.2 
3030 IF K$="Q" THEN PT=PT+1 
3040 IF K$="A" THEN PT=PT-1 
3050 IF K$="0" AND RL>-30 

THEN RL=RL-1 

Juegos INPUT 105 



]®Ki m mM&m 




CLR/HOME]TE SALISTE DE 

LA PISTA" 
6210 IF AS<40 THEN PRINT 

"AFORTUNADAMENTE NO 

IVAS TAN DEPRISA" 
6215 IF AS<40 THEN PRINT 

"COMO PARA CAUSAR MU 

CHOS DA#OS" :GOTO 6500 
6220 IF AS<80 THEN PRINT"A 

ESA VELOCIDAD SALES CON 

POCOS DA#OS" 
6225 IF AS<SO THEN PRINT"Y 

LIGERAS CONTUSIONES" 

:GOT0 6500 
6230 PRINT"SALIR DE LA PISTA 

A TAL VELOCIDAD WO DEJA 

SUPERVIVIENTES!" 
6500 COLOUR 6,6 :NRM:PRINT 

"C5*CRSR abajo:[4*CRSR 

dcha.DDETALLES FINALES 

DEL VUELO" 
6510 PRINT"CCRSR abajoDVELO 



3060 IF K$="P" AND RL<30 

THEN RL=RL+1 
3070 RETURN 6100 

5500 GOSUB 2000:G0SUB 3000: 

GOSUB 1000 
5510 IF PZ<=0 THEN 6000 
5520 GOSUB 2000:G0SUB 2060 6110 
5530 GOTO 5500 6120 

6000 IF ABSCRL)>RT OR PT>TP 

OR PT<0 OR AS>80 THEN 

6100 
6010 IF ABSCPX)>WR OR ABSCPY 6130 

)>1000 THEN 6200 

6020 pause 1 :print":shift+ 

clr/home:]felicidades 6200 

IO6 INPUT Juegos 



FOR UN BUEN ATERRIZAJE" 

:G0T0 6500 

FOR Z=1 TO 15:LINE 80, 

55,RNDC1)*160,RND(1)* 

110,RND(1)*3+1 iCOLOUR 

6,Z 

NEXT Z: PAUSE 3 

IF AS<40 THEN PRINT 

"CSHIFT+CLR/HOMEIUN 

60LPE COMO ESE HAS 

DESTROZADO EL" 

PRiNT"AVION Y HAS MA 

TADO A LOS PASAJEROS": 

GOTO 6500 

PAUSE 1 :PRINT"t:SHIFT+ 





CIDAD DEL AIRE=";INT 

(AS);"M/S" 
6515 PRINT"DISTANCIA =";INT 

(SQR(PY*PY+PX*PX)): 

PRINT"C3*CRSR dcha.: 

CABECEO =:";PT 
6520 PRINT"[:4*CRSR dcha.J 

BALANCED =";RL:PRINT 

"C5*CRSR dcHa.DRPM =^"; 

INT(10*TC)/10;"X 1000" 
6530 PRINT"!:3*CRSR dcha.: 

DERIVA =";INT(AES(PX3); 

"METROS":PRINT"CCRSR 

dcha.:ORIENTACION =";AD 

;"GRADOS" 
6540 PRINT"i:2*CRSR abajoD 

OTRA VEZ C[CTRL+6]SyN 

CCTRL+4)?":FLASH 5,10: 

POKE 650,0 
6550 GET A$:IF A$<>"S" AND 

A$<>"N" THEN 6550 
6560 OFF:IF A$="N" THEN 



. print'tshift+clr/home:] 

CCTRL+ViCOLOUR 6,1:END 
6570 RUN 

El bucle principal que se extiende 
entre las lineas 5500 y 5530, ha sido 
modificado de forma que se pueda uti- 
lizar la subrutina de control. 

Las lineas 3000 a 3070 confiercn al 
teclado el control del aeroplano. Las 
Kneas 3010 y 3020 te permiten utilizar 
fsl [f] para hacer que el avion vaya 
mas lento o mas rapido. Lo que haccn 
[sl y [T] es modificar el valor del re- 
gimen de revoluciones del motor, in- 
crementando o decrementando la va- 
riable TC. De forma analoga, [Q] y 
[a\ alteram la inclinacion del avion, 
en otras palabras, al presionar 



Q ,el 



avion tendera a de scender, mientras 
que si aprietas [a] tendera a elevar- 
se, incrementando o decrementando 



FT. Analogamente, las lineas 3050 y 
3060 hacen que jO | y jT] actuen mo- 
dificando el balanceo de la aeronave, 
es decir, te permiten hacer virajes. 

Si en la b'nea 5510 PZ resulta ser 
igual o mcnor que cero, el avion ha to- 
cado el suelo y el programa salta a la 
linea 6000. Las lineas 6000 a 6540 se 
ocupan de determinar donde has to- 
rnado tierra y de comprobar si lo has 
hecho bien o mal. 

La linea 6000 comprueba si el ba- 
lance y la inclinacion estan dentro de 
los limites perniitidos, de si el rumbo 
scguido es el correcto y de si la velo- 
cidad del aire esta por debajo de los 
80 metres por segundo. Si la velocidad 
el rumbo seguido por el avion estan 
fuera de los limites, e! programa salta 
a la linea 6100, que dibuja una serie 
de grietas en la ventaniUa de la cabi- 
na. Despucs de una corta PAUSE, las 
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lineas 6120 y 6130 abordan una inves- 
tigacion y un posible proceso por par- 
te de las autoridades de Aviacion Ci- 
vil; naturalmente ello significa que te 
has estrcllado. 

La linea 6010 comprueba la posi- 
cion del aeroplane con relacion a la 
pista de aterrizaje. La linea 6200 se 
ocupa de presentar las malas noticias: 
ATERRIZAJE FUERA DE LA PIS- 
TA. Si la velocidad del aire en el mo- 
mento de tomar tierra era menor que 
40 metres por segundo, las lineas 6210 
y 6215 te dicen al piloto lo siguicntc: 
AFORTUNADAMENTE NO IBAS 
DEMASIADO RAPIDO Y LOS 
DANOS NO SON MUCHOS. El pro- 
grama salta entonces a la linea 6500. 

Si la velocidad del aire estaba com- 
prendida entre 40 y 80 metres por se- 
gundo, aparece el mensaje: CON 
ESTA VELOCIDAD HAS PODIDO 
ESCAPAR CON LIGEROS DANOS 
Y UNOS CUANTOS ARANAZOS. 
Si la velocidad era mayor que 100 me- 
tres per segunde, se trata de un caso 
para las autoridades de Aviacion Ci- 
vil... 

Cuando el avion aterriza correcta- 
mente, el ordenador salta a la linea 
6020, que se encarga de enviar el men- 
saje de aterrizaje con exito. Cuaiquie- 
ra que sea el resultado del aterrizaje, 
el siguiente paso es la rutina que con- 
tiene los detalles del vuelo, la cual co- 
mienza en la h'nea 6500. 

La linea 6500 presenta el titulo de 
los detalles, mientras que las lineas 
6510 a 6530 presentan todos los valo- 
res de las variables asociadas con el 
avion. Esta informacion es la que te 
permite-juzgar exactamente lo bien 
que lo has hecho. 

Al final del programa figura una ru- 
tina de ^OTRA VEZ? por si quieres 
intentarlo de nuevo. 

Observa que las agujas de los relo- 
jes mantienen las referencias de las 



LAS SERPIENTES 
SUMADORAS 



Guia a la serpiente hanibrienta para 
que coma en el «Juego de la serpiente 
de INPUT». Al engullir avidamente los 
suculentos numeros, la pequeiia ser- 
piente ira creciendo hasta hacerse 
enorme. Naturalmente, siempre que 
tengas la necesaria destrezg. 

El juego de la serpiente es uno de 
los mas conocidos y mas faciles de ju- 
gar, pese a lo cual continua siendo 
enormemente enviciante. Por suerte, 
no hace falta recurrir al codigo maqui- 
na para programar un juego de este 
tipo; precisamente este es un juegp 
que ha marcado epoca en la historia 
de los ordenadores domesticos, figu- 
rando como uno de los mas satisfacto- 
rios que pueden escribirsc en BASIC. 

JUGANDO EL JUEGO 

El objcto del juego es ir guiando a 
la hanibrienta serpiente por la 
pantalla, de forma que 
vaya enguUendo los nu- 
meros que van apare- 
ciendo de forma aleate- 
ria. Los niimeros 
disminuyendo, de 
forma que 



cuanto mas tarde la ser- 
piente, mas baja sera la 
puntuacion. Si tardas de- 
masiado y el numero se 
decrementa hasta cero, 
desaparecera y en su lu- 
gar aparecera otro nume- 
ro. Cada vez que la ser- 
piente se traga un nume- 
ro, su longitud aumenta 
en el correspondiente nu- 
mero de segmentos. 

Ten cuidado de no sobrepasar los 
bordes y de no permitir que la serpien- 
te se entrecruce consigo misma, cosa 
que te ira resultando mas dificil a me- 
dida que se va haciende mas larga. Si 





condiciones iniciales del vuelo a mode 
de comparacion paratu mejor control. 
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EL CLASICO JUEGO EN UNA 



VERSION PARA BASIC 
DIBUJO DE LA COMIDA 



COMIENDO NUME ROS 

U\ CULEBRA SE EXTIENDE 



atraviesas uno de los bordcs o el cuer- 

po de la serpiente, cl juego terminara 
y aparecera un mensaje de FUERA 
que cubre toda la pantalla. 

para C-64 

10 POKE 53280,2:POKE 53281,1 
:PRINT "ESHIFT+CLR/HOMED" 

20 HS=0 

30 DIM S(1000,2) 

40 POKE 54296,0 

1D0 S=0 
S(1,1)==10:S(1,2)=U 
SC2,1)=11:S(2,2)=14 
S(3,1)=12:S(3,2)=U 
GOSUB 1500 
T=1:H=3 
YV=1 :XV=0 

FOR N=1 TO 3:SP=1024+S 
(N,1)*40+S(N,2):P0KESP, 
163: POKE 54272+SP,6:NEXT 
Y=12:X=14 
P=0 

GOSUB 1000 

SP=PEEKC1024+Y*40+X):IF 
SP=160 OR SP=163 OR Y=0 
THEN 2000 

H=H+1:IF H=1000 THEN H=1 
SP=1024+Y*40+X:P0KE SP, 
163: POKE SP+54272,6 
S(H,1)=Y:S(H,2)=X 
SP=SCT,1)*40+SCT,2)+1024 
:POKE SP,32 

T=T+1:IF T=10QO THEN T=1 
IF POO THEN 260 
P=INT(RNDC1)*9)+1 :FY=INT 
(RNDC1)*21)+2:FX=INTCRND 
(1)*37)+1 

IF PEEKC1024+FY*40+FX)<> 
32 THEN 250 
SP=1024+FY*40+FX: 

POKE SP 

.P+48:P0KE 

SP+54272,0 
270 IF RND(1)<.95 THEN 290 
280 P=P-1:IF P=0 THEN POKE 

1024+FX+FY*40,32 
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290 IF FYOY OR FXOX THEN 

170 
300 S=S+P:SP=1024+Y*40+X: 

POKE SP,163:P0KE SP+ 

54272 ,6:PRINT 

"CCLR/HOMEKCTRL+9: 

:6*CRSR dcha-^'S 
310 FOR N=1 TO P 
320 GOSUB 1000 
325 SP=PEEK(1024+Y*40+X):IF 

SP=^160 OR SP=163 OR Y=0 

THEN 2000 
330 H=H+1:IF H=1000 THEN 

H=1 

340 S(H,1>=Y:SCH,2)=X 

350 SP=1024+S(H,1)*40+SCH,2) 

:POKE SP,163:P0KE SP+ 

54272,6 
355 FOR M=1 TO 10: NEXT 
360 NEXT N 
500 GOTO 165 
100D GET A$ 
1010 IF A$="Q" THEN YV=-1 : 

xv=o 

1020 IF A$="A" THEN YV=1 : 

xv=o 

1030 IF AS="0" THEN XV=-1 : 

YV=0 
1040 IF A$="P" THEN XV=1 : 

YV=0 
1050 Y=Y+YV:X=X+XV:RETURN 
1500 FORN=OT039:POKE1024+N, 

160:POKE55296+N,0:POKE 
, 1984+N,160:POKE56256+N 

,0:NEXT 
1510 FOR N=1T023:POKE1024+N 

*40,160:P0KE 1063+N*40 

,160 
1515 POKE 55296+N*40,0:P0KE 

55335+N*40,0:NEXT 

1520 print"Cclr/home:cctrl+i: 

CCTRL+91 PUNT0S"S;TABC1 8) 

"CCTRL+9aMAY0R 

PUNTUACI0N";HS 
1590 RETURN 
2000 FOR F=0 TO 24: POKE 

54272+F,0:NEXT 
2010 POKE 54273,8 
2020 P0KE54277,175:P0KE54278, 

30:POKE54296,15:POKE 

54276,129 
2030 PRINT"LCLR/H0ME:";TAB 

(11)"CCTRL+3:[CTRL+9] 

FUERA!" 
2040 FOR F=0 TO 10:PRINT 
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2060 
2070 



2090 



"cclr/home:"tab(11) 
"fuera!":for g=0 to 90: 

NEXT:PRINT"i:CLR/HOMEn" 

TABC11)"CCTRL+9]FUERA" 

FOR 6=0 TO 90:NEXT G,F: 

POKE 54277, 0:POKE 

54278,0 

IF S>HS THEN HS=S 

PRINT'TSHIFT+CLR/HOMEH 

C8*CRSR abajo:3"TABC15) 

"PUNT0S"S:PRINT"C2*CRSR 

abaio]"TAB(13)"NAY0R 

PUNTUACION"HS 

PRINT TAB(3)'TCTRL+9J 

C2*CRSR abajoDPULSA UNA 

TECLA PARA JUGAR DE 

NUEVO." 

POKE 198,0:WAIT 198,1: 

PRINT'TSHIFT+CLR/ HOMED" 

:GOTO 100 



El primer listado del programa prin- 
cipal esta hecho para el Commodore 
64, pero si dispones de un Vic con una 
ampliacion de memoria RAM de 3K, 
puedes jugar el juego, modificando las 
lineas que figuran a continuacion y no 
utilizando las lineas 2010 y 2020. He- 
mes tenido que limitar el tamafio de 
la zona de juego a causa de lo liniita- 
do de la memoria. 
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"cshift+clr/home:]" 

30 DIM SC308,2) 

40 POKE 36878,15 

135 POKE 36867,32:G0SUB 1500 

140 T=1:H=3 

145 YV=1:XV=0 

150 FOR N=1 TO 3:SP=768a+S 

CN,1)*22+SCN,2) :POKESP, 

163:P0KE 30720+SP,6:NEXT 
190 SP=PEEK(7680+Y*22+X):IF 

SP=160 OR SP=163 OR Y=0 

THEN 2000 
200 H=H+1:IF H=308 THEN H=1 
210 SP^76S0+Y*22+X:P0KE SP, 

163:P0KE SP+30720,6 
230 SP=S(T,1)*22+S(T,2)+7680 

:POKE SP,32 
240 T=T+1:IF T=308 THEN T=1 
245 IF POO THEN 260 
250 P-INT(RND(1)*9)+1 :FY=INT 



CRND(1)*13)+2:FX=INTCRIMD 

C1)*18)+1 
255 IF PEEKC7680+FY*22+FX)<> 

32 THEN 250 
260 SP=7680+FY*22+FX:POKE SP 

,P+48:P0KE SP+30720,0 
280 P=P-1:IF P=0 THEN POKE 

7680+FX+FY*22,32 
300 S=S+P:SP=7680+Y*22+X: 

POKE SP,163:P0KE SP+ 

30720, 6:PRINT 

"CCLR/H0MED[CTRL+93"S 
325 SP=P£EKC7680+Y*22+X):IF 

SP=160 OR SP=163 OR Y=0 

THEN 2000 
330 H=H+1:IF H^308 THEN H-1 
350 SP=7680+S(H,1)*22+S(H,2) 

:POKE SP,163:P0KE SP+ 

30720,6 
1500 FORN-0T021 :P0KE7680+N, 
160:POKE38400+N,0:POKE 
8010+N,160:POKE38730+N 
,0 




1510 POKE7680+N>t22,160:POKE 

7701+N*22,160 
1515 POKE 38400+N^22,0:POK£ 

3S421+N*22,0:NEXT 
1520 PRINT'TCLR/HOHE: 

FCTRL+9: [CTRL+i:"S; 

TABC10)HS 
2000 FOR Z~200T0127STEP-1: 

POKE 36877, Z:NEXT 
2030 PRINT"[CLR/H0ME]E2*CRSR 

abajon";TAB(9)"CCTRL+3: 

FCTRL+9]FUERAi" 
2040 FOR F=0 TO 10; PRINT 

■TCLR/H0ME3[2*CRSR 

abajoJ"TABC9)"FUERA!": 

FOR G=0 TO 90:NEXT: 

PRINt'TCLR/H0ME]C2*CRSR 

abajo:"TAB(9)"ECTRL+91 

FUERA!" 



2050 FOR G=0 TO 90:NEXT G,F 

2070 POKE 36867, 174:PRINT 
'TSHIFT+CLR/H0ME3 
[8*CRSR abajo]E5*CRSR 
arriba]PUNTOS"S:PRINT 
'T2*CRSR abajoHMAYOR 
PUNTUACION"HS 

2080 PRINT "ECLR/HOME: 
i:CTRL+9JPULSA UNA 
TECLA PARA JUGAR DE 
NUEVO." 

2090 POKE 198,0;WAIT 198,1: 
PRINT"CSHIFT+CLR/HOME]" 
GOTO 100 

En la linea 10 se definen los colores 
de la pantalla y se borra esta, dejan- 
dola lista para los graficos del juego. 
La puntuacion maxima se pone a cero 
en la linea 20, mientras que la puntua- 
cion actual se pone a cero en la linea 
100. 

La linea 30 dimensiona la matriz S, 
que se utilizara para almacenar las 
coordenadas de la serpiente sobre la 
pantalla. La maxima longitud de la 
serpiente es dc 1000 segmentos para el 
Commodore 64 y de 308 para el Vk 
20; por ello, para definir cada posicion 
de pantalla hace falta una matriz bidi- 
mensional dc 1000x2 en el case del 64 
y de 308x2 elementos para el Vk 20, 
ya que para cada posicion de pantalla 
se necesitan las coordenadas x e y. Tni- 
cialmcnte la serpiente ocupara las po- 
siciones (10,14), (11,14) y (12, 14). 
Las Imeas 110 a 130 sitiian las coorde- 
nadas en los primeros tres pares de 
elementos de la matriz. 

La subrutina de definicion de pan- 
talla empieza en la linea 1500 y es lla- 
mada desde la linea 135. La linea 1500 
dibuja los bordes superior e inferior 
de la pantalla y las Ifneas 1510 y 1515 
dibuja los bordes laterales. La puntua- 
cion actual y la maxima se establecen 
en la linea 1520. 

Las variables H y T que figuran en 
la linea 140 son los punteros de la ma- 
triz. H csta apuntando al par de ele- 
mentos que contienen las coordenadas 
de la cabeza mientras que T hace lo 
raismo para las coordenadas de la 
cola. En el caso de la linea 140, la cola 
esta almacenada en el primer par y la 
cola se almacena en el tercer par. 
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En la linea 145 se defincn dos vec- 
tores, XV e yv, encargados de Uevar el 
seguimiento de la direccion en que se 
mueve la serpiente. Cualquicra de 
ellos puede tener uno de tres valores; 
El significa que la serpiente no esta 
mirando en esa direccion; el 1 signifi- 
ca que la serpiente sigue recta o va ha- 
cia abajo, y el —1 significa que sigue 
recta o va hacia arriba. La linea 145 
hace entonces que se mueva la ser- 
piente hacia arriba al principio del jue- 
go. 

La linea 150 POKEa la serpiente en 
la pantalla. Hay un bucle FOR ... 
NEXT que toma los valores uno a 
tres, lo cual hace que la serpiente este 
inicialmente forraada por tres segmen- 
tos. La linea 160 utiliza dos variables: 
X e y, para hacer el seguimiento de la 
cabeza de la serpiente. A estas varia- 
bles se les asigna la posicion POKEa- 
da para la cabeza en la linea 150. La 
Iinea 165 contiene un indicador P, 
para saber cuando esta siendo presen- 
tado algun numero. 

La linea 175 llama a la subrutina de 
lectura del teclado, que empieza en la 
linea 1000. Las lineas 1010 a 1040 leen 
las teclas [q] , [a\ , [o] y jT] y es- 
tablecen los vectores de forma apro- 
piada. La linea 1050 utiliza estos vec- 
tores para calcular la posicion de la 
serpiente y finaliza la subrutina. 

La linea 190 comprueba si la ser- 
piente ha invadido alguno de los hor- 
des o se ha entrecruzado consigo mis- 
ma. Caso de que ocurra aiguna de es- 
tas dos cosas, salta a la subrutina de 
spinal de Juego» que esta en la linea 
2000. Si la posicion de la serpiente es 
legal, la linea 200 incrementa el pun- 
tero de la cabeza y lo desplaza hacia 



atras hacia el principio de la matriz en 
caso de que haya llegado al final. La 
cabeza es POKEada en su nueva po- 
sicion por medio de la linea 210 y la 
linea 220 se encarga de introducir la 
nueva posicion en la matriz. La linea 
230 borra la cola, de forma que la ser- 
piente no se vaya haciendo cada vez 
mas larga. La linea 240 incrementa el 
puntero de la cola y comprueba que 
todavia esta apuntando a un elemento 
situado dentro de la matriz. 

Cuando esta siendo presentado al- 
gun numero, la Ifnea 245 envia el pro- 
grama a la 260. En caso contrario, ha- 
bra que presentar un nuevo numero. 
La linea 250 selccciona un nuevo nu- 
mero aleatorio y una posicion en que 
presentarlo. La linea 255 comprueba 
si la posicion elegida no es un espacio 
prohibido. Si asi es, el programa re- 
trocede de nuevo a la linea 250. La li- 
nea 260 POKEa el numero en la pan- 
talla. 

A medida que va transcurriendo el 
tiempo, el numero que hay en la pan- 
talla va siendo decrementado. En la li- 
nea 270 se introduce un cierto factor 
de aleatoriedad, comparando el nu- 
mero aleatorio con 0.95. En la mayo- 
ria de los casos, la linea de decremen- 
to de la puntuacion, que es la 280, se 
salta. Lo que hace esta linea es com- 
probar que dicho numero sigue sien- 
do mayor que cero despues de haber 
sido decrementado; en caso contrario 
dicho numero se borra. Si la cabeza 
no ocupa la misma posicion de panta- 
lla que el numero en cuestion, la linea 
290 completa el bucle, enviando el 
programa nuevamente a la linea 170. 




Cuando la serpiente se come el nu- 
mero, el programa llega a la linea 300. 
La puntuacion se incrementa justa- 
mente en el valor del numero que se 
acaba de comer. La cabeza se POKEa 
en la pantalla y aparece el valor del 
tanteo alcanzado. 

El bucle FOR ... NEXT que se ex- 
tiende entre las iineas 310 y 360 aiia- 
de a la serpiente el numero correcto 
de segmentos; este numero de seg- 
mentos esta determinado por el niime- 
ro que acaba de ser engullido por sus 
colmillos. Cada vez que se recorre el 
bucle, la linea 320 llama a la rutina de 
lectura del teclado; la linea 325 com- 
prueba si la cabeza sigue estando to- 
davia en una posicion legal y la 330 in- 
crementa el puntero de la cabeza. A 
continuacion la h'nea 340 almacena en 
la matriz la nueva posicion de la cabe- 
za y POKEa dicha cabeza por medio 
de la linea 350. Para aiiadir los nue- 
vos segmentos lo que se hace es no su- 
primir lo que sobra de la cola. Como 
el programa se encuentra ahora con 
menos cosas que hacer, el movimien- 
to de la serpiente se vera considera- 
blemente acelerado, pero introducien- 
do el retardo de la linea 355, la velo- 
cidad se mantendra constante. 

La seccion final del programa, que 
empieza en la linea 2000, es la rutina 
de fin de juego. En el caso del Com- 
modore 64, la linea 2000 deja a la ma- 
quina lista para generar un efecto so- 
noro. Las lineas 2010 a 2020 son las 
que generan dicho efecto. En el Vic 
20, el efecto sonoro se genera linica- 
mente en la linea 2000. No te olvides 
de subir el volumen del televisor. Las 
lineas 2030 y 2040 hacen que aparezca 
intermitentemente el mensaje FUE- 
RA! en el borde superior. Hay una pe- 
queha pausa en la linea 2050 antes de 
que el sonido se 
extinga. La li- 
nea 1060 actua- 
liza la puntua- 
cion maxima en 
caso de que sea 
necesario y la 
2070 presenta la 
puntuacion ac- 
tual y la maxi- 
ma. 
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COMMODORE 6't 

El manjal del cassette para el C-Sk y VIC-20 

El libro de ideas para el C-bh 

C-6'( consejos y trucos I 

Peeks y Pokes para el C-64 

Diccionario para su C-6't 

Lenguaje maquina para el C-64 

tenguaje maquina para auanzados para el C-6't 

C~Sh interno 

Graficos para el C-G't 

C-S't en el campo de la ciencia y la tecnica 

Mantenimiento y reparacion del floppy 15^11 

El manual escolar para el C~()k 

l^obotica para su C-64 

Todo sobre el floppy 15'i1 

El ensanbladDf 

Introduccion a la inteligencia artificial 

lodo sobre bases de dates y gestion de ficheros 

Todo sobre impresoras CBM bk-IZS- 

C-6^ consejos y trucos 11 

El libro de estad'sticas para el C-6^ 

El Commodore 6'i como traductor 

C-6A rutinas del sistema 



10 
11 
12 
13 

15 
16 
17 
18 

19 
20 
21 

22 



COMMODORE 128 

101 Todo sobre el nuevo C-128 

102 C-128 consejos y trucos 
105 C-128 interno 

10't C-128 Peeks y Pokes 

105 C-128 para principiantes 

106 El gran libro BASIC C-128 
' 107 CP/M para Commodore 128 

* 108 Todo sobre el floppy 1571/15?0 

COMMODORE AMIGA 

* 201 AMIGA para principiantes 

COMMODORE C-16 
301 C-16 pars principiantes 



1.696 
1.696 
2.968 
1-696 
2-968 
2.332 
2.332 
^.028 
2.332 
2.968 
2.968 
2.968 
2.968 
3.392 
2.332 
2.968 
2.332 
2.968 
2.332 
2.968 
2.332 
2.332 



2.332 
2.968 
h.ZhO 
1.908 
1.908 
2.5U 
3.392 
4.676 



4.134 



1.696 
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AMSTRAO CPC 

1001 El manual escolar CPC 464/6128 2.332 

1002 CPC 46^/6128 consejos y trucos 1 2.332 

1003 Peeks y Pokes CPC 464/6128 I.696 

1004 El lenguaje maquina para CPC 464, 664, 6128 2.332 

1005 CP/M el libro de ejercicios para el CPC 2.968 

1006 El libro de ideas para CPC 464, 664, 6128 2.352 

1007 CPC 6128 para principiantes 1.908 

1008 CPC consejos y trucos II 2,544 

1009 El gran libro del floppy CPC 664/6128 2.968 

AMSTRAD PCW 

* 1101 PCW 8256 para principiantes 2.332 



2001 MSX programas y utilidades ' 2.332 

2002 MSX graficos y sonido 2.968 
2005 El manual escolar mi 2.968 
200^1 MSX lenguaje maquina ' 2.332 

2005 MSX consejos y trucos ; 2.332 

2006 MSX para principiantes ' ,: ■ 1.908 

ZX SPECTRUM 

3001 ZX Spectrum consejos y trucos . .: -1^ 2.332 

3002 El manual escolar ZX Spectrum . _■ 1 2.332 

ATARI 600Xt/800XL/l30XE ' '' 

4001 Aventuras y como se programs en el ATARI 2-332 

4002 Manual escolar para ATARI 6OOXL/8OOXL/IOXE 2.968 

4003 Peeks y Pokes para ATARI 6OOXL/8OOXL/I5OXE 2.332 

4004 Juegos y estrategias y como se programs 1.696 

ATARI ST ■ - ^ ■ - ■ ■ . 

4101 ATARI ST Peeks y Pokes ' " ■ I.9O8 

4102 ATARI ST consejos y trucos - 2.968 

4103 ATARI ST para principiantes 2.544 

4104 ATARI ST aplicaciones graficas " ' 2.544 

GENERALES 

6001 Todo sobre el procesador Z-80 4.028 

6201 Metodologia de la programacion 2.332 

6202 Metodologia y practicas LOGO 2.656 

6203 Practicas BASIC I ,- {.^'^l 





COMMODORE 64 




10001 


TEXTOMAT 


6.552 


10002 


PROFIMAT 


6.552 


10003 


ADA 


13.104 


10004 


ELECTROMAI 


4.592 


10005 


PLATINE 64 
COMMODORE 126 


33.600 


10101 


BASIC 128 


6.552 



Procesador de textos con juego de caracteres castellano y Catalan, 

Monitor y macroensamblador. 

Ut) potente lenguaje de programacion. 

Disenador de esquemas de circuitos. 

Disefiador de circuitos impresos con trazo autoraaticc 



Compilador basic optimizado 
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ASI ES EL MAPA DE MEMORIA 
DEL COMMODORE 64 (III) 



Bytes $0039 y $003A = 57 y 5^ 

Aqui se guarda el niimero de linea 
con la que esta trabajando el progra- 
ma en BASIC en el momento presen- 
te. 

A medida que el programa avanza 
en su ejecucion este niimero va sien- 
do actualizado automaticaraente. 

Bytes $003B y $003C = 59 y 60 

Estos dos bytes almacenan el nume- 
ro de linea de programa procesada 
previamentc. 

Bytes $003D y $003E - 61 y 62 

Este puntero es de algun mode 
complemento a las dirccciones $39 y 
S3A. Almacena la direccion de la li- 
nea de texto en BASIC que se esta 
procesando. No confundirlo con el nii- 
mero de linea, puesto que se trata de 
la direccion de la memoria del orde- 
nador en la cual comienza la linea. 

Bytes $003F y $0040 = 63 y 64 

Cuando existen lineas con DATA 
en un programa se almacena en estas 
direcciones el numero de linea al que 
se esta dirigiendo en cada momento el 
programa para la Icctura de datos. 

Bytes $0041 y $0042 = 65 y 66 

Es un puntero que indica la direc- 
:i?n del siguiente elemento DATA 
j_r debe ser leido. 

Bnes $0043 y $0044 = 67 y 68 

Es:e puntero indica la direccion de 
— e— :?ria del origen de la fuente de da- 
:"je utilizan en cada momento IN- 
■ - r. READ o GET. 

Bnes $0045 y $0046 = 69 y 70 
40 INPUT 



Aqui se guarda el nombre de la va- 
riable (2 bytes) que se esta buscando 
en el momento en que es necesaria 
(consultar bytes $2D y $2E). 

Bytes $0047 y $0048 = 71 y 72 

Apuntador hacia el byte anterior al 
descriptor de la variable utilizada en 
cada jnstante por el programa en BA- 
SIC. 

Bytes $0049 y $004A = 73 y 74 

Contiene la direccion de una varia- 
blc utilizada en un bucle 
FOR... NEXT en ese instante. 

Bytes $004B y $004C = 75 y 76 

Durante las operaciones raatemati- 
cas de comparacion se utilizan estas 
direcciones como memoria interme- 
dia. 

Byte $004D = 77 

Cuando se realiza una operacion de 
comparacion se utiliza esta direccion 
para almacenar una mascara que de- 
termina si el resultado es mayor que, 
menor que o igual. 

Bytes $004E y $004F = 78 y 79 

Estas direcciones estan relacionadas 
con la definicion de funciones — DEF 
FN — actuando como puntero hacia el 

descriptor correspondiente. 

Bytes $0050 a $0053 = 80 a 83 

Puntero hacia el descriptor de cade- 
nas utilizado en ese instante. Tambien 
almacena la longitud de la cadena. 

Byte $0054 = 84 




que es el primer byte dc la instruccion 
de salto (JMP) utilizada en el raicro- 

procesador 6510 para saltar incondico- 
nalmente a cualquier direccion de la 
memoria. Completa el salto con una 
direccion proccdcnte de la tabla que 
comienza en $A052. 



Contiene el valor constante $4C, Bytes $0055 y $0056 ^ 85 y 





Vector del salto descrito en el ante- 
rior byte. 

Bytes $0057 a $005B = 87 a 91 

Registro utilizado en opraciones 



Acumulador niimero 1 para opera- 
ciones en coma flotante. Se utiliza 
tambien en conversioncs de dates a 
distintos formatos (p.ej. coma flotan- 
te a enteros o viceversa). 



Actua como contador en una eva- 
luacion de polinomios. Rccoge el nii- 
mero de evaluaciones individuales que 
deben efectuarse para resolver una ex- 
presion. 



Byte $0068 = 104 

Byte de redondeo para el acumula- 
dor nijmero 1 en coma flotante. 

Bytes $0069 a $006E = 105 a 110 

Acumulador nuraero 2 en coma flo- 
tante. Su formato (exponente, manti- 
sa, sTgno) es el mismo para el acumu- 
lador ntimero 1 ($61 a $66). 

Byte $006F = 111 



Contiene el resuitado de la compa- 
racion de signos entre los contenidos 
del acumulador numero 1 y el acumu- 

aritmeticas. actiia como acumulador lador numero 2. 

numero 3. 

Byte $0070 = 112 
Bytes $005C a $0060 = 92 a 96 

Byte de redondeo para el acumula- 
Registro utilizado en operaciones dor de coma flotante numero 1. 
aritmeticas, actua como acumulador 
numero 4. Bytes $0071 y $0072 = 113 y 114 




Bytes $0061 a $0066 - 97 a 102 



Puntero el buffer del cassette. 

INPUT 41 



REUCIONES 
LOGICAS 
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m"' OPERADORES RELACIONALES 
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■ tUNA COSA ES MAYOR, IGUAL 




■ MENOR QUE OTRA? 




■ OPERADORES LOGICOS 




■ USO DE AND, OR Y NOT 



L»s ordenadores son capaces de eje- 
cutar millones de operaciones logicas 
por segundo. Pero la logica es adenias 
una parte fundamental de cualquier 
programa. 

Hay tres tipos de expresiones que se 
utilizan en la programacion con BA- 
SIC. Una gran parte de todo progra- 
ma esta constituida por operaciones 
aritmeticas y las realizadas con cade- 
nas de caracteres; sin embargo, es el 
tercer tipo de operaciones, las realiza- 
das con las expresiones logicas, el que 
realmente se ocupa de la toma de de- 
cisiones dentro de un programa. 

Su funcion elemental consiste en 
evaluar si algo es «verdadero» o «fal- 
so». Las palabras y simbolos que uti- 
liza el programa para hacer esto se Ha- 
inan operadores (en algunos casos se 
Uaman tambien conectores. 

En las expresiones logicas se utili- 
zan dos tipos de operadores: los rela- 
cionales (que incluyen simbolos mate- 
maticos tales como <, > e ~), y los 
logicos que forman parte del reperto- 



rio de palabras reservadas en todas las 
versiones del BASIC: AND, OR y 
NOT. 

MAYOR, IGUAL MENOR 

Los operadores relacionalcs pueden 
utilizarse incluso en los programas 
BASIC mas sencillos. Las posibles 
comparaciones que utilizan estos ope- 
radores son: 

A > B ... A es mayor que B 

A < B ... A es menor que B 

A ^ B ... A es mayor o iguai que B 

A ^ B ... A es menor o igual que B 

A = B ... A es igual que B 

A <> B ... A es diferente de B 

Habras visto estos operadores utili- 
zados docenas de veces en los progra- 
mas de INPUT o en cualquier otra 
parte, y aunque su utilizacion es miil- 
tipie, su valor en las pruebas condicio- 
nales resulta mas evidente en relacion 
con la sentencia IF ... THEN. Un 
ejemplo ti'pico de esto es: 



IF A>B THEN PRINT "A ES 
MAYOR QUE B" 

En este caso, el valor de la variable 
A debe superar el valor de B para que 
se ejecute el resto de la linea. En los 
casos en que el valor de A permanez- 
ca por debajo del valor de B, el pro- 
grama se limitara a pasar a la linea si- 
guiente. Puedes ver que es posible dis- 
poner de una cierta capacidad de sal- 
to condicional; si resulta un determi- 
nado conjunto de valores, el progra- 
ma hace una cosa; si resulta otro con- 
junto de valores, el programa hace 
otra cosa distinta. 

Los operadores relacionales no es- 
tan unicamente limitados a manejar 
valores numcricos; tambien sirven 
para comparar cadenas de caracteres. 
No obstante, hay que manejarios con 
precaucion para evitar encontrarte 
con resuitados inesperados. Se debe 
tener presente que la comparacion 
siempre se detiene en el niimero de ca- 
racteres correspondiente a la mas cor- 
ta de las dos cadenas que se compa- 



1 




ran. Asi, si una do las cadcnas contie- 
ne once caracteres, mientras que la 
otra solo siete, unicamente interven- 
dran en la comparacion los primeros 
siete caracteres de la cadena mas lar- 
ga, comparandose con sus correspon- 
dientes en la cadena corta. 

Los caracteres se comparan uno por 
uno y de izquierda a derecha; de aqui 
pueden surgir los resultados inespera- 
dos. En una comparacion de tipo nu- 
merico, la proposicion 5 > 10 es evi- 
dentemente falsa, pero en una compa- 
racion entre cadenas, puedes encon- 
trarte una sentencia en la que se com- 
paren dos variables en la siguiente for- 
ma: A$ > B$. Si A$ = «5» y B$ - 
«10» el ordenador compara en primer 
lugar el caracter que figura mas a la iz- 
quierda, que en este caso es un 5 en 
una de las cadenas y un 1 en la otra, 
y a continuacion se para porque con- 
sidera que ya no tiene nada que com- 
parar. 

En consecuencia se obtiene un «ver- 
dadero» como resultado de la compa- 
racion, debido a que 5 es mayor que 
1, pero el ordenador ignora los niime- 
ros restantes de la cadena mas larga. 
Tienes que estar atento para no come- 
ter errores de este tipo. 

En las comparaciones entre cadenas 
de caracteres, a las letras del alfabeto 




sc Ics siiponc la siguicnle rclacion dc 
orden: «A» < «B» < «C» < «D» , et- 
cetera. Pero tambien aqui has de te- 
ner cuidado, ya que el ordenador no 
entiende realmentc lo que estos carac- 
teres significan. Lo que hace es com- 
parar los codigos correspondientes a 
cada caracter, sicndo igualmente sig- 
nificativos dentro de la cadena los es- 
pacios y otros caracteres que no son 
letras, pero que disponen tambien de 
un codigo propio. Como puedes ima- 
ginarte, esto podria causar estragos en 
un programa de clasificacion de cade- 
nas por orden alfabetico. 

Cuando ambas cadenas contienen 
una secuencia de caracteres parciaL 
mente identica, se considera nuraeri- 
camente mayor a la cadena mas larga. 
Pero observa que una cadena mas cor- 
ta es considerada mayor en una expre- 
sion como la siguiente : «ABD» > 
«ABCD» ya que la comparacion se 
detiene en cuanto sc cncuentra con la 
primera diferencia, es decir, al com- 
parar los codigos correspondientes a 
los caracteres «D» y «C». El funciona- 
miento es de hecho el mismo que se si- 
guc al asignar prioridades alfabeticas 
en la redaccion de un indice o un dic- 
cionario, en el que «para» figura an- 
tes que «paradoja», pero despues de 
«pan». 



VERDADERO O FALSO 



'l\)da comparacion produce un re- 
sultado que en realidad es un numero 
entcro. Cuando la comparacion resul- 
ta ser falsa, el resultado es 0, mientras 
que cuando es verdadera el resultado 
es 1, dependiendo del ordenador que 
sea. Teclca este comando en modo di- 
recto para observar el resultado que 
corresponde a tu ordenador: 
PRINT 6>5, 5>7 

La expresion de la izquierda es ver- 
dadera y la de la derecha falsa. En 
consecuencia obtendras en la pantalla 
un 1 o un 0. 

Los mimeros cnteros que obtengas 
como resultado de las comparaciones, 
puedes utilizarlos para realizar calcu- 
los dentro de tus programas. No obs- 
tante tienes que tener cuidado de no 
intentar hacer divisioncs por 0, lo que 
tc dari'a un mensaie de error. 



OPERADORES LOGICOS 

Las palabras reservadas AND, OR 
y NOT son operadores logicos que 
constituyen una poderosa extension a 
la capacidad de toma de decisiones 
por medio de la sentencia IF ... 
THEN. Por ejempio puedes poner: IF 




esto es cierto AND eso otro es cierlo. 
THEN hacer una determinada cosa. 
De esta forma puedes ir construyendo 
funciones de gran complejidad. Estos 
operadores, que a veces se llaman 
tambien operadores booleanos (aun- 
que no debes dejarte impresionar por 
este nombre) se pueden utilizar en co- 
mandos directos o dentro de los pro- 
gramas para obtener un «valor de ver- 
dad» en condiciones de prueba que 
pueden Uegar a ser muy complejas. 
De esta forma constituyen una alter- 
naliva muy comoda a lo que en otro 
caso seria un confuso conglomerado 
de saltos condicionales a base de una 
utilizacion masiva de sentencias IF ... 
THEN. 




990 0KAY=1 
MES<10 AND 
AN0<2001 



AND ms>5 AND 
AN0>1900 AND 



USO DE «AND» 



En su forma mas simple, se puede 
considerar que cJ operador AND tie- 
ne el mismo significado que la conjun- 
cion espanola «y». En una expresion 
tal como la siguiente: 

IF V>0 AND V<10n PRINT 
"DENTRO DE RANGO" 

El mensaje solo aparecera en pan- 
talla cuando la variable V este com- 
prendida entre y 100. 

En un programa puedes tener una 
linea como esta: 



Esta Imea de programa te permiti- 
ria comprobar si una determinada fe- 
cha corresponde a un verano del siglo 
XX. 

En este caso se utiliza AND para 
realizar cuatro pruebas, cuyos resulta- 
dos deben ser todos ciertos para que 
OK siga siendo verdadera. En esta 
prueba de validacion se asigna en pri- 
mer lugar a la variable OK el valor 
«verdadero». A continuacion se impo- 
ne la condicion de que MES caiga en 
el intervalo de 6 a 9, y de que ANO 
este entre 1901 y 2000. Pero miremos 
un poco mas en detalle lo que ocurre. 
Si se cumplen todas las condiciones, 
todas las expresiones daran un valor 
verdadero. Asi, dc hecho la li'nea de 
programa se convierte en : 

990 0KA>=-1 AND -1 AND ~1 
AND -1 AND -1 

Si ahora le anades PRINT OK, pue- 
des comprobar que el resultado es en 
efecto 1, es decir verdadero. 

USO DE «0R» 

El operador OR puede recibir una 
consideracion en gran parte analoga a 



la de AND, aunque su significado es 
diferente, como ocurre con la conjuu- 
cion espanola «o» en su uso cotidia- 
no.Tambien aqui observaremos su 
empleo en una sencilla linea de pro- 
grama en la que se utiliza para com- 
parar los valores de una variable: 



IF V=8 OR V=10 PRINT "OKAY" 

El mensaje aparecera en la pantalla 
si el valor de la variable V es 8 o 10. 

El operador OR resulta de gran uti- 
lidad cuando se comprueba la validez 
de las entradas suministradas a una 
sentencia INPUT dentro de un pro- 
grama. Si por ejemplo el programa te 
pide que introduzcas tu edad, siempre 
habra alguien que tecleara — 10 6 999 
con la intencion de probar a ver que 
pasa. Pero puedes solucionar el pro- 
blema de la siguiente forma: 



10 INPUT A 
20 IF A<1 OR 
PRINT "ESTAS 
GOTO 10 



A>120 THEN 
DE BROPW?": 



USO DE «NOT» 



El tercer operador logico que se uti- 
liza con frecuencia es el NOT. Es un 
poco diferente de los anteriores en el 
sentido de que solo utiliza un argu- 
mento, es decir, solo actua sobre la ex- 
presion numerica o logica que le sigue, 
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a difercncia de AND y OR que actuan 
sobre la expresion que les precede y 
sobre la que les sigue, es decir son 
operadores binarios o de dos argu- 
mentos. 

Puedes utilizar NOT en un progra- 
ma como el siguiente: 

IF MOT CA>10) THEN 999 

En el lenguaje hablado normal, po- 
driamos traducir la anterior expresion 
mas o menos asi: «Si el valor de A no 
es mayor que 10, pasa a la linea 999». 

La funcion logica que realiza el ope- 
rador NOT es convertir una condicion 
verdadera en falsa y viceversa. Puedes 
utilizaria pues para invertir el valor re- 
sultante de una prueba anterior. 

TABLAS DE VERDAD 

En relacion con los operadores 16- 
gicos, te encontraras con mucha fre- 
cuencia con las «tablas de verdad». 

En realidad son algo muy seneillo 
que sc utiliza para dar una represen- 
tacidn visual de lo que ocurre cuando 
se hacen operaciones de AND y OR 
con los valores 1 y (vcrdadero y fal- 
so). El operador NOT no necesita en 
realidad una tabla de verdad, ya que 
basta con invertir los valores para ob- 
servar su efecto. 

Las tablas de verdad pueden adop- 



tar formas diferentes. Una forma tipi- 
ca para el operador AND es: 



A B 



C 



-1 


-1 


-1 


(Linea 1) 


-1 








C Lines 2) 





-1 





CLinea 3) 











( L inea ^) 



El significado de la linea 1 de la ta- 
bla es e! siguiente: «Si A es verdadera 
y B es verdadera, entonces C es ver- 
dadera*. El significado dc la Imca 2 
es: «Si A es verdadera y B es falsa, en- 
tonces C es falsa». La linea 3 signifi- 
ca: «Si A es falsa y B es verdadera, en- 
tonces C es falsa». La h'nea 4 por su 
parte significa: «Si A y B son falsas, 
entonces C es falsa». Analogamente la 
tabla de verdad del operador OR es: 



B 



C 



1 


-1 


-1 


1 





-1 





•1 
" 1 


-1 












La primera linea significa: «Si A es 
verdadera y B es verdadera, entonces 
C es verdadera». Las Imeas 2 y 3 pue- 
den ser ambas interpretadas como: «Si 
A o B son verdaderas, entonces C es 
verdadera». El significado de la linea 
4 es: «Si A y B son ambas falsas, en- 
tonces C es tambien falsa». 



APLICACION PRACTICA ^ 

Aqui tienes finalmente un progra- 
ma que utiliza los operadores AND, 
OR y NOT. Se trata de una version 
simplificada de un programa que cal- 
cula la escala correcta de salaries para 
alguien que ha solicitado un empleo: 

10 INPUT "EDAD";EDAD 

20 INPUT "NUMERO DE NilVELES" 

;NIVELES 
30 LET iViAS18=CEDAD>=18) 
40 LET CUAL=(NIVELES>=5) 
50 IF NOT I^AS 18 AND NOT 

CUAL THEN PRINT "NO 

UTILIZABLE" 
60 IF (NOT KiASl8 AND CUAL) 

OR CMASIS AND I^JOT CUAL) 

THEN PRINT "ESCALA 

SALARIAL UNO" 
7D IF RASIS AND CUAL THEN 

PRINT "ESCALA SALARIAL 

DOS" , ,. -. . 

Supongamos que como respuesta a 
las dos primeras sentencias INPUT, 
tecleas 20 afios de edad y cuatro nive- 
les O. Esto significa que (EDAD ^ 
18) es verdad, mientras que (ONIVEL 
^ 5) es falso. En consecuencia la per- 
sona es MAS18 (mas de 18 anos) y NO 
CUAL (no cualificada) . El ordenador 
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Ahora tienes la ocasion de hacerte con los 

1 mayores exitos del aho 

en su presentacion original 

(cada uno en su estuche y con su caratula) 

a un precio de autentico chollo: 3.995 pts. 

Imaginate... Los 10 mejores titulos de 1986 
per poco mas de lo que cuesta uno solo. 
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ANTES QUE SE AGOTE!!! 



"SUPER-10" SPECTRUM 


"SUPER-1 0" AMSTRAD 1 


EXPLODING FIST 


EXPLODING FIST 1 


TURBO ESPRIT 


TURBO ESPRIT 1 


ROCK'N LUCHA 


ROCK'N LUCHA ■ 


ZORRO 


ZORRO ■ 


3 WEEKS IN PARADISE 


3 WEEKS IN PARADISE 


ABU SIMBEL (PROFANATION) 


ABU SIMBEL (PROFANATION) 


SABOTEUR 


SABOTEUR 


CAULDRON 11 


CAULDRON II 


BRUCE LEE 


BRUCE LEE 


SPY HUNTER 


RAID OVER MOSCOW / 


"SUPER-10" COMMODORE 


"SUPER-10" M.S.X. 


EXPLODING FIST 


ALIEN-8 


URIDIUM , 


KWIGHT LORE 


GOONIES^ 


GUNFRIGHT 


SABOTEUR / 


NIGHTSHADE 


BEACH HEAD II ' 


JACK THE NIPPER 


CRITICAL MASS . 


SHOW JUMPER 


SPY HUNTER 


VALKYR 


ZORRO 


BOUNDER 


SUPER-ZAXXON 


MAPGAME 


FIGHTING WARRIOR 


JET SET WILLY 11 




DISTRIBUIDOR EXCLUSIVO PARA ESPARA: ERBE SOFTWARE 

C/. STA. ENGRACIA, 17. 28010 MADRID. TEL. (91) 447 34 10 

DELEGACfON BARCELONA; AVDA. MISTRAL, 1 TEL. (93) 432 07 31 




encuentra enseguida este con junto de 
condiciones en la linea 60, imprimien- 
do a continuacibn «ESCALA DE SA- 
LARIO LINO». Puedes ampliar facil- 
mcnte este programa para que com- 
pruebc mas condiciones, por ejemplo 
si el solicitante cuenta con mas de dos 
anos de experiencia, o cualquier otra 
circunstancia que sea necesaria para el 
trabajo. 

OPERAGIONES NUMERICAS 

El USD de los operadores logicos no 
esta unicamente limitado a las senten- 
cias IF ... THEN que acabamos de 
ver. Tambien se pueden utilizar en al- 
gunos tipos de operaciones numericas. 
Puede que ya las hayas visto utilizadas 
asi en algiin programa y a lo mejor te 
has quedado maravillado de lo que su- 
cedia. De hecho no siempre funcionan 
de la forma obvia que podria esperar- 
se. Teclea lo siguiente: 

PRINT 375 AND 47 . 

Tal vez esperas que el resultado sea 
422, o quizas 37547. Y sin embargo el 
resultado es 39. ^Que ha sucedido? 
Para explicarlo, tenemos que aden- 
trarnos algo mas en la forma de tra- 
bajar del ordenador, a fin de entender 
el modo en que este maneja los dos ar- 
gumentos cuyo AND se calcula. 

En principio ambas expresiones 



(375 y 47) se convierten en su equiva- 
lente binario de dos bytes. 

375 en binario es: 

0000000101110111 

Por su parte, 47 en binario es; 

0000000000101111 

A continuacion la funcion AND 
realiza una comparacion bit a bit so- 
bre los 16 bits, dando un 1 como re- 
sultado unicamente cuando hay un 1 
en el mismo bit de ambos niimeros en 
binario. Empezando por la derecha, 
solo los pares de bits cero, 1, 2 y 5 
cumplen esta condicion. Esto da como 
resultado el numero binario 
0000000000100111. 

Al volver a hacer la conversion a 
decimal, los bits 5, 2, 1 y puestos a 
1 dan un valor combinado de 39; este 
es el resultado de hacer un AND de 
375 y 47. 

Ensaya ahora ei siguiente comando: 

PRINT 375 OR 47 

^A que se debe cl resultado 383 que 
se obtiene en este case? Al realizar la 
operacion con OR logico el resultado 
de cada comparacion bit a bit es 1 si 
hay un 1 en cualquiera de los bits del 
par que se compara.Observa de nue- 
vo la forma binaria de los numeros an- 
teriores y veras que los bits 8, 6, 5, 4, 
3, 2, 1 y tienen un 1 en al menos uno 
de los bits del par. El numero binario 



resultantc es OOOOOOOlOlliilU que es 
383 en decimal. 

Con el operador OR es posible ob- 
tener el mismo valor de bits con ex- 
presiones diferentes. Por ejemplo, si 
tecleas PRINT 315 OR 75, el resulta- 
do es tambien 383. Si quieres puedes 
coraprobarlo realizando la conversion 
de los numeros a forma binaria. 

El valor -1 (que se almacena como 
FFFFFFFF en hexadecimal, es decir 
un conjunto de bits que son todos 1) 
queda inalterado cuando con el se rea- 
liza una operacion de OR logico con 
otro numero cualquiera. Para hacer la 
prueba, teclea el siguiente comando 
directo: 



PRINT -1 OR 375 

cuyo resultado es — 1. 

Veamos ahora una aplicacion nu- 
merica para el operador NOT: 

PRINT MOT 10. 75, NOT -11 

Los valores resultantes son — 11 y 
10. Asi vemos que en efecto NOT 
suma 1 al numero sobre el que se apli- 
ca y a continuacion cambia su signo. 
Observa que el niimero en punto flo- 
tante se redondea por defecto al ente- 
ro ma proximo y que es posible esti- 
mar el valor real por medio de X = 
— (X -H 1). De hecho este valor se con- 
vierte a un entero de cuatro bytes, to- 
dos cuyos bits quedan invertidos. 




NUMEROS 
BAJO CERO 




CUANDO LOS NUMEROS NEGATIVOS 

SE HACEN NECESARIOS 

PROGRAMA DE CONVERSION PARA 

NUMEROS NEGATIVOS 

LA CONVENCION DEL SIGNO 



La comprension de los numeros bi- 
naries y hexadecimales no suele ser di- 
ficil, pero la expresion de valores ne- 
gativos con estos sistemas de numera- 
cion puede presentar problemas. 

En la programacion de algunos jue- 
gos puede ser necesario utilizar valo- 
res negatives, por ejemplo, para des- 
plazarse sobre la pantaila en determi- 
nadas direcciones. Las direcciones van 
codificadas en grupos de ocho bits, ya 
que esa es la unica manera en que el 
ordenador puede almacenar los datos 
en la memoria. Pero surge un proble- 
ma: como henios visto, un byte puede 
representar cualquier niimero desde 
hasta 255, es decir, desde 0000 0000 
hasta 1111 1111. Pero con esto se ago- 
tan las posibilidades de un numero bi- 



nario de ocho bits, que ya no tiene si- 
tio para un signo menos o mas, ni for- 
ma alguna de representarlo. 

En la aritmetica ordinaria, al restar 
1 de se obtiene el valor —1; aqui tie- 
nes ese mismo calculo realizado con 
numeros binaries de ocho bits: 

0000 cooo 

_ -1 



1111 1 



i i i 



Puedes probar a tomar un 1 presta- 
do de la columna situada mas a la iz- 
quierda, pero cuando el numero bina- 
rio esta limitado a ocho bits no hay 
manera de hacer nada. Analogamen- 
te, al restar otro 1 (en la aritmetica 
tradicional se obtendria como resulta- 



do un —2) tenemos 1111 1110, que en 
binario correspondc al numero deci- 
mal 254, ya que 1111 1111 es 255. 

Esto no son curiosidades tipicas de 
los numeros binarios: imaginate por 
ejemplo io que ocurriria en decimal si 
solo hubiese tres sitios o columnas en 
las que poner los numeros. Mira lo 
que sucederia si se intentase sumar 
100 a 999 con estas hmitaciones: 

100 

4 ^99, 

(1)099 

El uno que figura en la columna de 
las unidades de mil, esta escrito entre 
parentesis; en un sistema aritmetico 




INPUT 49 



con solo tres columnas no hay espacio 
para las que «te llevas». En un siste- 
ma de solo tres lugares, el resultado 
de esta suma es pues 99, o sea, exac- 
tamente el resultado de 100 menos 1. 

De la misma forma, sumar 98 con 
100 en un sistema de tres lugares equi- 
vale a restar 2, mientras que restar 998 
de 100 equivale a sumarle 2. 

En conclusion, una misma sucesion 
de numeros de un byte puede repre- 
seixtar un niimero positivo o negative, 
sin tener en cuenta la posible confu- 
sion dificultad en el calculo. 

^Que hacer entonces? En la mayo- 
ria de las aplicaciones de los ordena- 
dores dom.esticos, este problema no 
suele plantearse: tanto las direcciones 
de memoria como los codigos de ope- 
racion, ambos expresados en binario, 
pueden considerarse siempre como 
positives. Las unicas ocasiones en que 
se encuentran numeros negativos son 
en los datos o en los saltos del codigo 
maquina, equivalentes a los GOTOs 
del BASIC. 



CAMBIAIMDO LOS BITS 

- ^ ^^ ••' 

Para pasar de un valor positivo en 
binario a su correspondiente negative, 
hay que aplicar el liamado procedi- 
miento del complemento a 2; no tiene 
una base teorica de facil comprension, 
pero sin embargo funciona bien. 

Para pasar desde un numero en bi- 
nario a su correspondiente valor nega- 
tive, hay que cambiar los ceros por 
unos y viceversa, sumando al final 1 al 
resultado. 

El siguiente programa realiza preci- 
samente esta funcion. Observa que 
cuando el numero en binario esta li- 
mitado a echo cifras, su equivalente 
en hexadecimal consta exactamente 
de dos cifras: esto qui ere decir que 
tambien el equivalente hexadecimal 
del complemento a 2 es el correspon- 
diente valor negativo. 

TECLEA C-64 

1 REM**L3SIGNIFICA ESPACIO 
20 POKE 54277 ,33:P0KE 54278, 
255:P0KE 54273+23, 15:P0KE 

276,33 .-POKE 54273,0 

50 INPUT 




30 



40 



50 



60 



70 



80 



90 



FOR Z=1 TO 8:READ ACZJ : 
NEXT Z:DATA 128,64,32,16, 
8,4,2,1 

Z$="0123456789ABCDEF":A=0 
:A$="+-":AA=1 :P0KE 650, 
128:V$="C8*CRSR dcha.]" 
POKE 53280,1 :P0KE 53281,1 

iPrint'Tshift+clr/home: 

[:CTRL+1:[4*CRSR abajoH" 

FOR Z=1 TO 9:PRINT TAB(5) 

"t:CTRL+9:iC29*ESPACI0]": 

NEXT Z 

PRINT "LCTRL+S: 

CCRSR abajo:" TABC9) 

"COMPLEMENTO A DOS" 

PRINT "Cclr/home:" tab 

(12)"NUMER0S NEGATIVOS" 
PRINT TABC12)" 



100 PRINT "CCTRL+5:inGDEC 

[14*espacio:bin 

[:i4*ESPACI03HEX" 

110 PRINT"[FLECHA 1zq.: 
C4*CRSR abajoHCS+RSR 
dcha .: COMPLEMENTO" : PR INT 
"[3*CRSR abajo:"TABC29)" 
+1" 

120 PRINT"[:4*CRSR arn'baD 
[2*CRSR dcha.]+"TAB(37) 
"+" 

130 PRINT"i:9*CRSR abajo] 



140 PRINT"[:3[30C6*rESPACIO] 

on[:]o:]c:oc:nJO[3Donc: 
oi:jaoa[:]0[6*EspAcio: 

00": GOTO 300 
150 GET K$:IF K$="" THEN 150 
160 S=0:SS=0:IF K$<>" " AND 

K$<>"B" THEN 500 
170 A1=A:IF K$<>" " THEN 210 
180 IF AA=2 THEN A1=A1-1 
190 IF AA=1 THEN A1=A1+1 
200 GOTO 240 
210 IF K$<>"B" THEN 240 
220 IF AA=2 THEN A1=A1+1 
230 IF AA=1 THEN A1=A1-1 
240 IF AKO OR A1>128 THEN 

AA=AA+1 
250 IF A1>128 THEN A1=127 
260 IF AKO THEN A1=1 
270 A=A1 

280 IF A=0 THEN AA=1 
290 IF A=128 THEN AA=2:P0KE 

54273,9: F0RZ=.1T020:NEXT 




300 
310 



340 
350 
360 



380 



390 
400 
410 



420 



:POKE 54273,0 

IF AA>2 THEN AA=1 

W=0:IF AA=1 THEN T=1 : 

TT=0 

IF AA=2 THEN T=0:TT=1 : 

W=1 

A1=A-W:F0R Z=1 TO 8: IF 

ACZ)<=A1 THEN B(Z)=T: 

C(Z)=TT:A1=A1-ACZ):GOTO 

350 

BCZ)=TT:CCZ)=T 

IF BCZ)=1 THEN S=S+A(Z) 

NEXT Z:A2=0:F0RZ=1 TO 

IF CCZ)=0 THEN A2=A2+ACZ)| 

NEXT Z:A1=C255-A2)+T:IF 

A1>255 THEN A1=0 

FOR Z-1 TO 8:IF ACZ)<=A1 

+W THEN D(Z)=1:A1=A1-A 

(Z):SS=SS+A(Z):GdTO 400 

D(Z)=0 

NEXT Z 

PRINT"CCLR/HOMEa 

[:4*CRSR abajoJ";MID$(A$, 

AA,1)"C4*ESPACI0: 

L4*CRSR izq.J"A 

PRINT'TCRSR arriba: "V$; : 






FOR Z=1 TO S:PRINT BC2); 

:NEXT Z 
430 ZA=INTCS/16):2B=S-(16*ZA 

):PRINT"C5*RESPACI0r' 

MID$CZ$,ZA+1 ,1);MID$CZ$, 

ZB+1,1) 
440 PRINT "t:4*CRSR abajol 

"V$;:FOR Z=^ TO 8:PRINT 

CCZ);:NEXT:PRINT 
450 PRINT"i:7*CRSR abajo:";: 

IF AA=1 THEN PRINT"-"; 
460 IF AA=2 THEN PRINT"+"; 
470 PRINT"t:4*ESPACI0: 

[:4*CRSR izq.:"A:PRINT 

"ECRSR arriba]"V$; 
480 FOR Z=1 TO 8:PRINT D(Z); 

:NEXT Z:ZA=INTCSS/16): 

ZB=SS-(16*ZA) 
490 PRINT"!:5*ESPACI0]"MID$ 

(Z$,ZA+1 ,1);MID$CZ$,ZB+1 

,1):G0T0 150 
500 I$=',"':PRINT"[FLECHA izq/ 

i:CLR/H0ME:!:21*CRSR abajo: 

NUMER0(ENTRE-128 Y +127)' 

!:4*CRSR izq.D"; 
510 FOR Z=1 TO 4 



520 GET J$:IF Z=^ AND CJ$="-" 

OR J$="+") THEN U$=J$: 

PRINT U$;:NEXT Z 
530 IF Z=1 THEN 520 
540 PRINT"*C*CRSR izq.JE] 

LCRSR izq.J";:IF J$="*' 

THEN 520 
550 IF J$=CHR$C13) THEN 610 
560 IF J$=CHR$(20) THEN 500 
570 IF ASCCJ$)<48 OR ASC(J$) 

>57 THEN 520 
580 I$=I$+J$:PRINT J$;: 

NEXT Z 
590 GET J$:IF J$=CHR$(20) 

THEN 500 
600 IF J$<>CHR$(13) THEN 590 
610 IF VALdSXO OR CVALCIS) 

>128 AND U$="-")ORCVAL 

(I$)>127 AND U$="+")THEN 

500 
620 IF U$="-" THEN AA=2:GOT0 

640 
630 AA=1 
640 PRINT:PRINT"CCRSR arriba] 

i:39*ESPACI0:";:A=VAL(I$) 

:G0T0 280 



LA CONVENCION DEL SIGNO 

Como hemos dicho, para muchos fi- 
nes un numero en binario o en hexa- 
decimal corresponde perfectamente a 
un numero positive o negative. Sin 
embargo hay ocasiones en que se quie-. 
re conocer si un numero es positive o 
negative. 



Los saltos realizades en los progra- 
mas en lenguaje maquina requieren 
que se especifique el numero de bytes 
que abarcan, en valeres positives si el 
salto es hacia adelante y negatives si 
el salto es hacia atras. El ordenador 
examina el primer bit del numero bi- 
nario y determina por sf sole si se tra- 
ta de un numero positive o negative. 
Si el primer bit es un 1, el ordenador 
considera el numero como negative, 
mientras que si es lo toma como po- 
sitive. 

Este precedimiente se ajusta a una 
determinada convencion de signos. 
Esto significa que el ordenador, en vez 
de mancjar numeros binarios que va- 
n'an entre y 255, considera que su 
margen de variacion va desde —128 a 
-1-127. En el progra.ma de conversion 
en complemente a 2, habras oido la 
seiial de «bip» al llegar a 128. Esto se 
debe a que 128, que en binario es 1000 
0000 y en hexadecimal es $80, corres- 
ponde a un valor negative. (Haz la 
prueba: -1000 0000 + 1000 0000 = 
(1)0000 0000, que es en binario de 
echo bits; 80 + 80 - (1)00, que es 
en hexadecimal de dos cifras; 128 — 
128 = en decimal.) 

^Que sucede entonces? Dado que 
1000 0000 tiene un 1 en su primer bit, 
el ordenador lo considera como un nti- 
mero negative, el -128. For otra par- 
te el cere, que es 0000 0000, tiene un 
en su primer bit, per lo que el orde- 
nador lo toma como un numero posi- 
tive. 



SINTAX ERROR 

En el numero 12 de INPUT COMMODORE en el articulo «Aprovecha las interrupcio- 
nes», pag. 45, aparecieron unas erratas en la li'nea 30. Esta debe quedar como sigue: 

30 T$="000000":FOR Z=0 TO 5:P0KE 837-Z,VALCMID$(T$ 
,Z+1,1)):NEXT Z 

Del mismo modo la linea 160 del listado de la pagina 46 debe quedar como se Indica 
a continuacibn: 

160 DATA 157,14,30,169,0,157,14,150,232,136,208,239 
,76,191,234 

En el articulo «S6lidos de revoluci6n» hay algunos errores en las lineas 60, 130 y 
1.510. Deberan quedar asi: 

60 LINE BX,BY,X,Y,2. 

130 IF CP=12 AND X-M>140 THEN X=X-M 

1510 D=C:PY=IS*CY*.5) 
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T/TULO 




LOS MEJORES 

DE INPUT 
COMMODORE 



PORCLNTAjE 



Commando ... / 9,2 % 

Green Beret 18,7 % 

Skyfox 13,9% 

Uridium 12,8 % 

Rambo 11,7% 

Spindizzy 5,9 % 

Hardball 5,8% 

Saboteur 4,6 % 

Psi 5 Trading co 4,2% 

Biggies 3,2% 



100% 



Para la confeccion de esta relacion unicamente se 
han tenido en cuenta las votaciones enviadas por 
nuestros lectores de acuerdo con la seccion «Los 
Mejores de input». 

Noviembre de 1 986. 
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LOS DESACTIVADORES 



Te encuentras aL frente de 
un equipo de androides 
especiaLizados en la 
desacti vadAn de 
expLosivos. Corre eL aiNo 
2018. 

La misi6n consiste en 
recoger Las bombas que un 
grupo terrorista ba ido 
diseminando por Las 
insta Laciones de un 
importante centro secreto 
de desarroLLo, eL Institute 
de Investigaciones 
Gravi tadona Les. Debes 
LocaLizar Los artefactos 
depositados en cinco 
edif icios. 

Existen dos inconvenientes. 
Por un Lado Los robots 
guardianes han sndo 
reprogramados para atacar a 
todo Lo que vean, sin 
preguntar. Por otro cada 
estancia tieneun diferente 
niveL de gravedad. 
Lo m§s sorprendente de este 
juego de Laberinto es eL 
impresionante efecto 
tridimensional conseguido. 
Las habitaciones aparecen 
dibujadas en perspectiva y 
los androides ven afectado 
su tamaRo en funci6n de La 
distancia. SimuLtaneamente^ 
aparecen visuaLizadas dos 
estancias adyacentes. 
En La parte inferior de La 
pantaLla verSs un diagrama 
del edificio con La 
ubicaciAn de Los 
GxpLosivos, asi como La 
puntuaci6n y La cantidad de 
ayudantes que te quedan. 
Recuerda, no hay puertas 
traseras, s6Lamente podrSs 
saLir por La principal. 
Para compLicar mas adin Las 



cosas, deberSs coLocar 
determinados circuitos 
eLectr6nicos en La saLa del 
ordenador, sino surgi rSn 
graves problemas. 
Mediante el joystick, 
eliges desde el mapa al 
andoride que deseas manejar 
en cada momento, Despu^s 
podr^s pasearLo por Las 
habitaciones, Igualmente es 





factibLe examinar Las 
habitaciones y soLtar Las 
bombas y los circuitos 
empleando la ventana de 
control de iconos (figuras 
representat ivas de los 
elementos). Existe una 
Limitaci6n, cada androide 
soLamente puede llevar un 
elemento simuLtSneamente, 
por Lo que debes ser hSbi L 
en las secuencias de manejo 
de bombas y circuitos. 



DATOS GENERALES 

TTTULO Deactivators 
FABRICANTE Tigress Marketing 
ORDENADOR Commodore 64 

TEMA DEL PROGRAMA 

Desactivador de bombas 



CALIFICACION (Sobre 10 ptos) 



ORIGINAUDAD 
IHTERES 
GRAFICOS 
COLOR 



TOTAL 



9 
9 

9,5 

7 
6 

10,5 




decidiendo si quieres pasar 

tu bomba a otro 

robot. 

Aunque en un primer momento 
no Lo pueda parecer. 
Deactivators es un juego de 
inteligencia, que exige una 
atenciin extremada unida a 
La necesidad de dotes de 
observaci6n. Desde luego el 
entretenimiento est5 
asegurado, aunque no se 
cacen marciariitos. 
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MAIL ORDER MONSTERS 



Mai L Order Monsters es un 

curioso tItuLo para un 
juego muy curioso, que te 
LLevar^ a tierras y tiempos 
muy Lejanos, perdidos en La 
prehistoria de aLg6n 
planet a desconocido. 
EL programa posee tres 
niveLes de juego. EL 
primero es una especie de 
presentaciin reducida de Lo 
que suceder^ en Los dos 
siguientes. 

Todo se compra y se vende, 
puedes ped1 r a La fibrica 
de "morfos" eL monstruo de 
tu preferenda, partiendo 



HOKiSTERS 



PDOER 
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DATOS GENERALES 

TTTULO Mail Order Monsters 
FABRICANTE Electronics Arts 
ORDENADOR Commodore 64 

TEMA DEL PROGRAMA 

Mezcia entre Arcade y Juego de Es- 
trategia 




CALIFICACION (Sobre 10 ptos.; 



ORIGINAUDAD 

INTERES 

GRAFICOS 

COLOR 

SONIDO 



9,5 

10 

9,5 

9 

8 




desu catciLogo de doce 
criaturas- 

Lo mas excitante del juego 
es eL torneo. Solo frente 
aL ordenador o contra un 
amiguete, deberSs eLeglr aL 
monstruo que te represente. 
Los monstruos LucharSn en 
d-ist-intos sectores^ 
despLazandose por eLLos a 
goLpe de joystick. Con eL 
propio botin de disparo 
obLigar^s a tu servidor aL 
ataque en su especiaLidad; 
aLgunos LLegan incLuso a 
escuplr. Pero ojo, debes 
vigiLar sus variables 
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vitales para conocer en que 

momento fisico se 

encuentra- 

Existen otros monstruos 

desperdigados por este 

mundo tenebroso. Pueden 

aparecer en cuaLquier Lugar 

y atacarAn a cualquiera de 

Los contricantes que Les 

apetezca . 

El juego tiene muLtitud de 



recursos que complican tu 
acceso a La victoria y que 
decubri rSs cuando Lo 
practiques. 

Tu principal baza consiste 
en eleglr un monstruo 
capacitado, pero en elLos 
nada es redefinibLe. Por 
ejempLo, existe una abeja 
venenosa, un encantador de 
brontosaurios, etc.. Busca 
bien entre Los doce 
disponibles, que podrS ser 
un monstruo baboso, o 
quizSs tenga una armadura 
inalterable o una 
inteligencia digna de 
envldia- Tambi^n varia la 
fuerza fisica, el llamado 
cociente vital etc.- 
Es en su segunda y tercera 
fases donde este programa 
se distingue de los dem5s. 
Para comenzar, te 
encuentras en medio del 
llamado "Centre de 
selecciin". Por medio del 
joystick puedes desplazarte 
hacia el Llamado "Centro de 
compras", que no. es sine un 
supermercado del horror- 
Los quinientos Psychons ( 
es el nombre de La moneda 
de cupso Legal en ese 
planeta ) te servirSn para 
comprar el monstruo de tus 
suenos, Lee atentamente Las 
ventajas e inconvenientes 
de cada uno y , sobre todo, 
trata de evaluar su 
relaci6n calidad/precio. Un 
monstruo baboso por ciento 
ochenta Psychons puede ser 
un muy buen negAcio, si 
tras esto compramos un poco 
m3s de cerebro para &L- Un 
poco mas de fuerza y coraje 
no Le vendrS nada mal 
tampoco. Pero cuidado, no 
gastes todo Lo que tienes, 
porque queda un apartado 
m3s: el armamento. Este 
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cubre pn'mero sus 
necesidades de defensa. 
PodrSs eLeg-lr desde un 
laser de protones 
defensives hasta un 
tentacuLo extra, o 
simpLemente una armadura 
"de Las baratitas". 
SaLimos del aLmacen. 
Ya tienes un magnifico 
animaL pero ai!in no es Lo 
bastante peLigroso teniendo 
en cuenta el barrio. HabrS 
que darse un garbeo por La 
armeria para selecionar 
aLgo conque defenderse 
nuestro pobre bicho, tal 
vez una espada, un 
LanzaLLamas, una granada e 
incLuso el pedrusco 



"vuLgari s". Aqui La ■ 
seLeci6n del armamento ha 
de sen acorde con Las 
estrategias de lucha que 
pienses adoptar. EL almac^n 
dispone de rricis de treinta 
armas diferentes, cada una 
tiene una utilidad muy 
definida. Por lo demcis La 
acciAn se desaroLLa como en 
la primera fase. 
Idem para La tercera fase, 
que requiere un serio 
entrenamiento con respecto 
a Las dos anteriores, Cada 
"morfo" ser5 asociado a 
cada tipo de Lucha, a cada 
ci rcunstancia y a cada tipo 
de Lucha- En esta Ultima 
etapa todo es redefinible: 



alimento del animaLito, 

botiquin, vitamlnas, etc 

A pesar de una animaci6n 
grifica que no sorprende, 
este j uego dispone de una 
serie de opciones que 
enriquecen 

considerabLemente La acciin 
del juego, sobre todo en Lo 
que se refiere a La 
estrategia. No hay que 
oLvidar que ^ste es un 
juego de estrategia con 
gran dosis de 
interacti vidad. 
Por otro lado, estamos ante 
un programa totalmente 
adaptado al casteLLano para 
mayor integraci6n del 
usuario en las aventuras. 
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CONTINUACION DE EXPLODING 
FIST 



Exploding Fist II: La 

Leyenda continAa Tras unos 
segundos de espera, verciS 
la imagen de un karateka 
pegando una patada contra 
una mesa como anticipo de Lo 
que viene a continuaciAn. 
Eres un activo Luchador que 
debe Luchar hasta el fin 
con un senor de La guerra. 
EL malvado tiene su guarida 
en un voLccin. 

Rasas por una etapa previa 
de aprendizaje de nuevas 
t^cnicas marciaLes. La 
recoLecciin de objetos 
disperses por Las pantaLlas 
y Lograr victorias ante 
quince oponentes aportan 
esos nuevos conocimientos. 
Exploding Fist II es un 
juego similar aL anterior 
en cuanto a surtido de 
patadas: voLtereta atrSs y 
adelante, golpe de mano a 
La cara, el estomago y las 
piernas, etc. 



Las t^cnicas permitidas son 
id^nticas, pero La caLidad 
grSfica difiere mucho, ya 
que su predecesor estaba 



■^ '--■. ■ ■ ■■ 

pLanteado sobre pantaLLas 
estSticas- Ahora se dispone 
de un fondo continue que se 
despLaza en scrolling. 





DATOS GENERALES 


TTTULD Exploding Fist II 




FABRICANTE Melbourne House 




ORDENADOR Commodore 64 




TEMA DEL PROGRAMA 

Artes MarciaJes 




.#^###»ll^^ 


! CALIFICACION (Sobre 10 ptas.) 


ORIGINAUDAD 

IMTERES 

GRAFICOS 

COLOR 

SONIDQ 


7,5 
8 
B 

6,5 
6 


TOTAL 


36 
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EL karateka se desplaza por 
una mans16n china en un 
escenario tropical. 
Apareces sobre eL tronco de 
un SrboL situado sobre un 
rio con abundante de 
vegetaci6n. Pasas a otro 
tronco, pero en este punto 
eres interceptado por un 
atacante enmascarado, que 



te propicia una magnlfica 
patada en toda La cara. 
La experiencia con eL 
joystick que adquiriste en 
La primera parte serS de 
vital importancia para 
saLir victorioso en La 
nuGva aventura- 
La masifin perece un 
rascacieLos mas que una 



casa china, porque nunca se 
acaban Las pLantas. Cada 
pLanta tiene un oponente de 
mayor niveL que eL 
anterior, haciendose mas 
Lenta La progresiin hacia 
eL final. 

EL juego acaba cuando 
Logras veneer al debilitado 
y perverso senor de La 
guerra, tras eludir sus 
trampas y derrotar a sus 
guardaespaldas en La cueva 
del volcSn. 

Es un juego cLSsico de 
artes marciaLes con 
elogiables caracteri sti cas 
grcificas y elevado nivel de 
realismo en los 
movimientos- 



-^••••••••^^'•••••••-A-***** 



PARALLAX 

La saga Uridium ataca de 
nuevo. Este juego es otra 
de sus variantes, que esta 
vez permite el scroLLing 
Cdesplzamiento) en las 



cuatro di recciones. 
Debes escapar de Los 
marcianos que se supone 
eran amigos, una vez que 
descubres algo que no 
debieras conocer: sus 
planes para invadir nuestro 
planeta- Tienes que lograr 





que Los planes de invasifin 
sean conocidos por Los 
confiados terrestres- 
Antes de marcharte tendr^s 
que recoger a los 
cientificos que coLaboraban 
en el planeta ahora 
enemigo, 

Aunque tu zona de vuelo 
aparece a vista de pAjaro, 
puedes variar tu altitud 
pasando por debajo o encima 
de Los obstaculos que se 
interponen en tu ruta. La 
sombra que proyecta sirve a 
su vez para que evaLues La 
altitud de La nave. 
Existen varios niveles y 
pasas de uno a otro una vez 
que franqueas La barrera de 





.-EJ.J ■'■_-=;» 
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seguridad. DeberAs conocer 
un cAdngo que permite La 
destrucciAn de La Linea que 
impide tu avance. Permanece 




atento a Los mensajes que 
aparecen por una ventana aL 
pie deL mapa. 
Es de destacar la Limpieza 



del scrolling del fondo- La 
misica es tambiAn ot ro 
elemento que demuestra lo 
elaborado del programa. 



WAR 



con el joystick, Una vez 



La primera impresi6n que 
nos produce este nuevo 
j uego es que se trata de 
una versiAn ampLiada del 
cL.5sico Uridium 
Aqu1 tomas el protagoni smo 
en forma de un habilidoso 
pi loto que maneja la nave 
de guerra mas avanzada 
tecnoLogi camente que existe 
y debes librar a La Tierra 
de Los moLestos invasores. 




Nuevamente eres el elegido. 
Se cierne sobre el pLaneta 
la amenaza marciana, que 
avanza con La pretensiAn de 
aduenarse del pLaneta azul. 
La conf ormaci An 
extraterrestre estS formada 
por veinte cilindros unidos 
entre si, posibi li tando la 
evacuaciAn urgente en caso 
de sen dar^ado cuaLquie'ra de 
elLos. Cada uno tiene su 
cometido, sea miltitar, 
residencia L, etc. 
Tendr^s que ir destruyendo 



a Los invasores y despues 
entrar en cada cilindro 
para terminar con Lo que 



que penetras en el interior 
de un cilindro, comienza 




queda de Al, pero el tiempo 

es limitado. 

Despues habr^s de elegir un 

cAdigo de colores correcto 

para Lograr sali r. 

a fuerza centrlpeta, 

producida mediante el giro 

de Los cilindros, actua 

como gravedad hacia elLos. 

Tienes que burlar y 

deshacerte de Las patrullas 

de control que trataran de 

cazarte. 

El manejo de La nave se 

efectua, como en habitual. 



automSti camente la cuenta 
atrSs para su 
autodestrucci An. Debes 
llegar al panel que 
contiene cinco f i las de 
celuLas de memoria y 
cursores de movimiento en X 
e Y. El color de la 
cerradura se verS en Las 
partes superior e inferior 
de la pantaLla. Tienes que 
apuntar el cursor a la 
celdiLLa del color marcado 
para abrir la puerta. La 
rapidez es fundamental. 



• •••+•••••■••••*•••••••• 



ASTERIX Y EL CALDERO MAGICO 



Los simpSticos amigos 
Asterix, Obelix y 
Panoramix, vuelven a Las 



andadas en tierras de La 

Bretaha francesa- 

Por si no Lo recordais. 



Asterix es el pequeno y mas 

cordial de la 

pandi Lla-Tambi An es Listo, 
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pero no es ta 
su ami go eL r 
Obelix porque 
un caLdero de 
mSgico cuando 
Desde entonce 
fuerte como u 
esti prohlbid 
nuevamente de 
embargo^ siem 
ver si puede 
poco- 

En uno de eso 
cuando cobra 
Obelix, eL re 
oficiaL de me 



n fuerte como 
egordete 

eL no cay6 en 

brebaje 

era un bebe, 
s Obelix es 
n muLo y Le 
o beber 
L mismo- Sin 
pre trata de 
conseguir un 

s Intentos, es 
vida el juego. 
parti dor 
nhires, hace 



cola para recibir su racion 
de brebaje- EL druida 
Panoramix Le dice que 
"verdes Las han segado.-"- 
En un momento de enfado, 
Obelix Le pega una fuerte 
patada aL caLdero, 
rompiendoLo en 8 trozos 
ante Los ojos at6nitos de 
los miembros deL pueblo. 
PanoramiX, s1n perder un 
momento, recoge el poco 
Liquido que no ha absorvido 
La tierra y se Lo entrega a 
Asterix. 
Nuestro h^roe marcha en 



busca de Los pedazos 
dispersos del caLdero, ya 
que es impresci ndible para 
preparar La p6cima, y snn 
eLLa no podrSn veneer nunca 
a Los romanos ". 
Esta es La ingrata misiin 
de nuestros personajes- 
En La pantaLLa aparecen 
van'os indlcadores- EL 
primero es eL niimero de 
jamones que tienen Los 
amigos Asterix y Obelix. 
Comprobareis que no pueden 
LLevar mas de 5 a la vez, 
pero emp-iezan con solo dos. 




DATOS GENERALES 

mULO Asterix y El Caldero Magico 
FABRICANTE Melbourne House 
ORDENADOR Commodore 64 

TEMA DEL PROGRAMA 

Aventuras de Asterix 



CALIFICACION (Sobre 10 ptos. 



ORIGINAUDAD 

INTERES 

GRAFICOS 

COLOR 

&ONIDO 



9 
8 
8 
8,5 
6 



TOTAl 



39,5 



Asl que es recomendabLe 
darse una vuelta por el 
bosqueciLlo situado aL este 
del campamento. 
Tambi^n se ve un dibujo que 
representa al caLdero, el 
nimero que aparece a su 
lado indica La cantidad de 
piezas recogidas. 
Otros tres indicadores 
muestran Las vidas 
disponnbLes, si tienes una 
LLave muy 6tiL para abrir 
cualquier puerta que 
encuentres y, por ilLtimo, 
el consumo del brebaje. 



Cuando quieras mas fuerza, 
basta con que dispares 
rSpidamente para beber unos 
sorbitos de La fabuLosa 
picima , 

EL juego estS bien 
resueLto. Los grificos se 
generan en La pantaLLa y 
tardan dos o tres segundos 
en reaLizarse. El sprite de 
los dos principales 
personajes no estSn en La 
Linea de este fabricante. 
Un curioso sistema de 
ventanas es utiLizado para 
Las escenas de Lucha- 




Cuando Asterix se encuentra 

con un enemigo, o un 
jabaLi, aparece una ventana 
sin color en La que se ve 
ampliada La escena. 
ExistirSn muchas ocasiones 
de pelea, porque Las piezas 
del caLdero se halLan 
siempre en territorio 
enemigo y abundan Las 
patruLLas de esos Locos de 
romanos. 



•••••••••• 
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IJIPV 



(t 



dllHIMIimHiUKmillBBbHIGHIiiWAlHniHUllliUIBHtt 



FlU'At CARTRIDGE ui Ci.iid versio.'i con Freezer 

FREEZE FRA>'!E p^rc, copias de sesuridad pass C a C,C d: D D a D 

y D cL C.con copiddor para programas secuenciales .foi-^.^teador 
rapidPdO ss?,y los comandos del dos en modo directo 

ISEPIC Pasa de cinte a disco en poco3 biogues.perni: tiendote 
entrar dentro dsl programs ciesprQtSJ ido 

SECURITY CASS interface- copiador de cinta a trjnta 



^■;- -■•"-•>- ■-""'-'■^-J!.'- -1° njn-j.,(Ji t>ii(j (J iinea^.i^on posiCj Jici<a,des u-c 
™;:.con!o touecidad,ecc>,rev^er_Ee,retardo,cone;(i:o:i HID! .:'".:. .... 

SOUND EXPANDER Amplis a echo roces Jas Posibi ;-ida.^es del sinte- " 
tizsdo-r.Sjntcsis de sonidos en ffl. Incsrpora -Patrones Rami os'-"-'^ 
X melodicps ssi oomo b^jos .Posibilidad d& commoner a tjempo -^ 
reaJ o scire partitUrci , enlace MIDI " ' "' 

SUPER -GRJiPHIX Da infini-tas posibi Ud&des -^ tJ' j-mpresora,- 

Mf™-.,, TuTho ace 1 ei-edor ' de disco con com/ndos del dos 

QUICK DISK PLUS + Turbo aceJerador comandos del DOS 

DIGIDRUM CPfit'ierte t:j Commodore en una bateria 
GRABADOR DE EPROfl 



SUPER DOLPHIN Tvrbo aceler^dor entre 20 y 25 ^eces con monitoi 

de codis-o maquma. programs las teclas de funcion y muchas- 
otr^s opciones 

SIMONS BASIC Da 1:4 comandos m<)s a tu CoKmodore 
EXPANSQR DE CAKTUCHOS conecta. varios cartuchos a ]« vez 

INTERFACE MIDI 
VENTILADOR AXIAL 
FUENTB ALIMBNTACION 64 




i^.s:..£iE!:;5} ::^t:i7amgg r ;ra 2mM^ 



HARDWARE 
128 D 130000 



64 
64c 
1541 
15410 



40500 
44500 
49900 
49900 



NLIOstar 83000 
Seikosa 57500 
Riteman 67.500 
Monitor F 28000 
Monitor C 65000 



UTiLIDADES 

Disponible todo de 

Casa de Software 

Cimex 

SEINFO 

HISPASOFT 

FERRE MORET 

SAKATY 

y productos impor 

tados por nosotro 



NOVEDADES 

FIST II - GliOST'W GOBLINiT'- PARALLAX - SOI/THEPJI BELL - SILENT SERl/ICE 
SUPER CYCLE - HAIL OPJ^ER MONSTER - ALLSr CAT - WAR - TRAP - HACKER 1 1 
ASTSRIX - DRAGONS LAIS - NISIOH A.D. - KHIGIIT RIDER - SOUTHERN BELL 
TUFILTSATOR - BIGLSSS - EXPRESS RAIDER ~ ^REAT ESCAPE - tllANI VICE 
SPITFiFE 40 - FLICHT DECK - TIMS TRAX - EQUIHOX - WAR PLAY - ACE 
Tl'SULAR BCLL - SHOGUS - ULTRA S^«£5 - FIOHA - HOVIE - BATflAII - QmSHlP 
mSBLE nADNESS - TAU CETTY - KERCENARY - SFINDIZY - PAPER BOY - ^HeKX.-.. 
y corca d» ml [itiiloa oias mjg aontinuemsnte fan aimenCando. 



.EDUCATIVOS 

B-ri™F*i"''-rt'r|tf ■ 

El .estu^iar no tiena por qua ser pesacfo y una incordja . pusde ser dSverZido 
y una oompeticion entre v^rioa aminos, taniendo al ordenador oomo arbrito, 

Hetooa Janeado ai mercado una saria da prosrraMS EDUCATIVOS pare S.fi,?,,- a 

da EGS , ftecJio por profcsorss da aouirdo a las rormas del MiK.'STERIO 

DE £Dl,'C.flC/0)V y CIENC;^ r qaa i-asmnan las editorjales mas impoj-tantes de 

*3ta c^i-so. 

Deis la oForcunidad a hu hijo da qua pueda cofupetir contr 

sua p^-opios companBi-is . en an proaranva ^ub .pcco a poeo j 

minar los tfimas tjuB esta estudiando en esCe curso. 

Si desea recibl.- n.3s Informacjon ascribanos o nameoos por Calefono 

C4TJL0G0 GMT U J TO 

Si quj'erea recjb 

>' arCiculijff a I 

NOmSE 



e J Ol-den^dor o 
oyudara a do- 



^rjodicamenta infurmacior sobra ji timas 
^enca fotocopie o reoorts este cupon y en^ielo. 



ffldades 



DJHECCrOW 

POBLACIOS OP 



TEIXFOWO ORDEN^DOfi 

CALVO ASEKSIO H.g mORlD 25015 TFNO 2131630 




UNA SESION DE GOLF 



perspecti va tridimensional . 
Puedes jugar con eL 
teclado, pero es preferible 



DATOS GENERALES 


TTTULO Hole in One 




FABRICANTE Mastertronic 




ORDENADOR Commodore 64 




TEMA DEL PROGRAMA 




Juego de Golf 


3aa 


CALIFICACION (Sobre 10 ptos.) 


ORIGINAUDAD 


8 


HfTEflES 


7,5 


GRAFiCOS 


9.5 


COLOR 


9,5 


SONIDO 


7 


TOTAL 


41,5 



viene a enriquecer eL 
surtido de programas ya 
exi stentes. 
Hay dieciocho hoyos y 
puedes eLeglr eL tipo de 
paLo a utiLizar en cada 
goLpe de joysti ck. 
Dispones de La informaci6n 
precisa: distancia y par^ 
as1 como La veLocidad y 
direcci6n deL viento. En La 






EL sano deporte del goLf ha carStuLa deL programa eL joystick, aunque en La 

marcado una tendencia en aparece tambi^n eL mapa deL muchos casos el refLejo deL 

Los videojuegos. Hole in campo de juego. movimiento no pareciA sen 

One es otra versiAn ue Los grSficos muestran una eL que esperabamos. 

••*•••*•••••••+*••••••• 



ALLEYKAT 



Nuevamente el Uridium 
parece haber side La pieza 
inspiradora de otro juego. 
ALLeykat es una camera per 
el mSximo tItuLo. Esta vez 
eL movimiento de La nave y 
eL fondo se produce en 
sentido vertical, desde 
abajo hacia La parte 
superior de La pantalLa. 
Existen obstacuLos, tales 
como arcos, que debes 
sortear para no estrelLar 
la nave. 

Se supone que La zona de 
vuelo son ruedas situadas 
en eL espacio y existen 
echo diferentes, con 
coLorido e incluso 





DATOS GENERALES 

TITULD Alleykat 
FARRICANTE Hewson 
ORDENADOR Commodore 64 

TEMA DEL PROGRAMA 

Com bate Espacial 



CALIFICACION (Sobre 10 ptos.) 

ORIGIPIAUDAD 7 

INTERES 7 

GRAFICOS 9 

COLOR 9 

SONIDO 7 



TOTAL 



39 
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Revis 



^^deSoftw?^ 



superficies distintos en 
cada caso- Para ganar eL 
premio en una de Las 
treinta y dos carreras, 
deberSs sen cuidadoso aL 
eLegir. Lo harSs de acuerdo 
con eL dinero disponibLe y 
tus habi Lidades 
pa rticuLa res- 
Las cameras incLuyen ocho 
tipos de prueba, que son 
una Ligera variante entre 
s1 - Se puede optar por 
voLar a toda marcha, 
compLi candose Las 
posibi Lidades de 



supervivencia. Se puede 
reaLizar vueLo de fondo, 
procurando djnicamente 
permanecer intacto. 
Destrulr eL paisaje, sin 
dejar piedra sobre piedra, 
es otra opci6n- IncLuso 
puedes practicar eL sLaLom 
entre Los obstacuLos de La 
pi St a. 

Comprueba eL nilmero de 
vueLtas que das, dejandoLo 
cuando est^s contento con 
tu puntuaciAn, para despu^s 
acudir a La siguiente 
carrera- 



EL tiempo se mide en 
extranos meses gaLScticos, 
reaLizandose una 
convocatoria por mes 
En La superficie aparecen 
depositados caracteres con 
La forma de La Letra E, que 
son puntos de energla. De 
acuerdo con tu habi Lidad, 
te ser5 pertnitido LLevar 
mas de Los cinco iniciaLes 
energ^ticas. 

Los efectos de sonido han 
sido cuidadosamente 
programados, Lo mismo se 
puede decir de La misica- 



••••••••••••••••••••••• 



EL COCHE FAIMTASMA 



Este coche fantSstico 
parece haber saLido con 
cierta premura, sin duda 
provocada por La ostentosa 
campana pubLicitaria en 
Las revistas de Gran 
Bretana. Por otra parte se 
habia creado una gran 
espectaciAn en torno a este 
tituLo. 

Has asumido La personaLidad 
de Michael Knight y viajas 
a bordo deL increibLe 
K.I.T.T. 

AL comenzar eL juego te 
encuentras en La cuidad de 
AtLanta CGeorgia, E.E.U.U) 
y recibes una comunicaciAn 
de Devon en La que este te 
pone en La pi sta de un 
grupo terrorista que estci 
tratando de perturbar La 



paz mundiaL, pretendiendo 
asesinar aL embajador ruso. 
La verdad es que se trata 
de una tarea muy diflciL La 
encomendada a nuestro h^roe 
deL momento, ya que a Lo 
Largo deL juego -taL y como 
sucedia en La reaLidad- no 
dispone de armas. 
EL juego se desaroLLa en 
base a tres pantaLLas 



diferentes, Una muestra eL 
mapa de Los Estados Unidos, 
en eL que aLgunas cuidades 
aparecen resenadas (Miami, 
Chicago, DaLLas. » .) . 
VerSs que en esta pantaLLa 
La cuidad en que te 
encuentras parpadea y La 
primera indicaciAn que 
aparece bajo eL mapa te 
dirS Lo que tienen Los 




DATOS GENERALES 

TTTULO Knight Rider 
FABRICANTE Ocean 
ORDENADOR Commodore 64 

TEMA DEL PROGRAMA 

Serie de Television 





I 

r 
■I 



CALIFICACION (Sobre 10 ptos 



ORIGINAUDAD 

IHTERES 

GRAFICOS 

COLOR 

SONIDO 

TOTAL 



8,5 
8 
9 
8 
8 

41,5 
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terrsristas en esa cuidad C 
s- ar^eria, sede o bien eL 

-3 segunda pantaLLa de 
j-e;: es La que mas a 
-^-_i: aparece en eL juego. 
Iz -'= vista en perspectiva 
re ,a carretera en La que 
se^as atacado por una serie 
z~ -eLi copteros. 
=." esta etapa eL juego 
:e — "te dos opciones: KITT 




conduce y tu disparas o aL 
rev^s. 

DeL supersalpi cadero de 
KITT que aparece en La 
carStuLa deL juego soLo 
quedan unos pocos 
controLes: un indicador 
digitaL de veLocidad, un 
contador de tiempo, un 
indicador de danos, y un 
indicador de caLentamiento 
deL Laser. No queda nada 



deL turbo^ etc... 

EL efecto de conducci6n aL 

girar eL voLante no es 

demasido rico y ni siquiera 

se mueve eL que se ve en La 

pantaLLa- Tampoco aparecen 

otros vehicuLos- 

Una interesate posibiLidad 

consiste en La detenclAn 

deL juego, presionado La 

tecLa RUN/STOP. 



-*-••••••••■*-•••••••••***• 



S0FT4CTUALIDAD 

AS DE ASES 




La harto conocida firma 
Accolade, popuLar por eL 
extremo cuidado con que 
eLabora Los grSficos de sus 
programas, ha adaptado un 
Best SeLLer europeorDam 
Busters- 
La verdad, no es soLamente 
una adaptaciin, sino una 
enorme mejora respect aL 
programa originaL. 
Existe ina opciAn de 
entrenamiento, pasando 
despu^s aL de ataque reaL y 
aL ataque a una presa, sea 
convoy de treneso incLuso a 
grupos de submarinos. La 
animacifin es extraordinaria 
y eL sonido esta totaLmente 
en La Linea de La casa.. 




'^■-'.'::«fc 
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HACKER 
(SEGUNDA PARTE) 

Fa'2 todos Los que se 
volvieron Locos con Hacker 
I, Activlsion Lanzi La 
sez^^.da parte de este 
~er~o:nenaL juego de 
estratdgia y acciAn. 
Esta vez La trama se 
desarroLLa en la central de 
inteligencia de Los 
soviet! cos. 



En cuatro ventanas verSs 
simuLtaneamente eL 
desarroLlo del juego. 
DeberAs utilizar cinco 
robots para sonsacar a Los 
cientificos rusos y evitar 
asi que lleguen a crear eL 
arma mortlfera que pudiera 
romper el inestable 
equiUbrio mundial. -i 
Esta vez Lo5 robots van 
equipados de cSmara, 
acceleradores, monitores, 
busca personas, etc 



En cuaLquier case, harA La 
delicia de todos Los que 
disfrutamos de La primera 
parte- 

••••••••*•■. 



"EL juego conversacional 
The pawn es el mejor juego 
de aventura que jamSs se ha 
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reLizado en cuaLquier 
sistema, aunque inncamente 
e)(iste por ahora en versiAn 
ATARI...". 

Esto era cierto hasta hace 
muy poco: ya que La version 
para Commodore pronto 
saLdrA at mercado y hay que 
ver La caLidad que aLcanzan 
estos programadores de 
Rainbird, incLuso eL 
pLanteamiento deL juego es 
interesante. 
Cada pantaLLa aparecerS 
partiendo de un scrooling 
desde La parte superior. 





-JH--^'^ ^"" X- 



resaltando parti cuLarmente 
por La caLidad grAfica, si 
Lo hace por La variedad de 
La animaci6n de Los 
jugadores. 

No hay que perderse eL 
efecto deL jugador que se 
tira en pLancha para 



atgo novedoso, sin- embargo^ 
Chess Hite^ 2000 Lo consigue 

pLenamente.'" "'■ ■ 7 

Imaginaros uh juego, de' 
ajedrez en, eL que puede,^ 
reguLar eL nimero de ^"jtI ) 
jugadas de previ siAn qtjW 
reaLizarA eL ,<'"^-^^ 

o rdenador^;^---'^..— ^'^j '^^='==^''; 
Este es un^=xugg0'-"^ue te : '-'"^ 
ensefia, a ganar i.ndicaiPtdotfe- 
todos Los -.movimi-entos que"^-^ 
puedes reaLizar con Las -'' 
piezas/ que tiene" opc.iAn, tj,i 
y tridim&hsionat "y'much-as- 
cosas m3s. Con eL que 
puedes pedi r ayuda en Los 
momentos diflciLes y que 



ERROR: ioerror 
OFFENDING COMMAND: image 

STACK: 



